考察一个旅程

找出从华盛顿州西雅图到路易斯安那州新奥尔良的路径，然后查询它的更多细节.

In[1]:=

trip = TravelDirections[{Entity[ "City", {"NewOrleans", "Louisiana", "UnitedStates"}], Entity["City", {"Seattle", "Washington", "UnitedStates"}]}]

Out[1]=

In[2]:=

DynamicGeoGraphics[{Red, Thick, GeoPath[trip]}, GeoRange -> {GeoPosition[{27, -86}], GeoPosition[{50, -127}]}]

播放动画

停止播放动画