驾驶还是步行？

决定从纽约的一个博物馆是驾驶还是步行到另外的博物馆.

In[1]:=

museums = {Entity["Museum", "MuseumOfModernArt::nfkn8"], Entity["Museum", "AmericanMuseumOfNaturalHistory::gf4kv"]};

计算这两个位置间驾驶和步行的行程路线.

In[2]:=

drive = TravelDirections[museums, TravelMethod -> "Driving"]

Out[2]=

In[3]:=

walk = TravelDirections[museums, TravelMethod -> "Walking"]

Out[3]=

比较两个路程.

In[4]:=

GeoGraphics[{GeoMarker[museums], Thick, Red, GeoPath[drive], Blue, GeoPath[walk]}, GeoRange -> Quantity[1, "Mile"]]

Out[4]=

从中央公园愉快步行的距离会短些，但需要更长时间.

In[5]:=

{walk["TravelDistance"], walk["TravelTime"]}

Out[5]=

In[6]:=

{drive["TravelDistance"], drive["TravelTime"]}

Out[6]=