Ache os mares mais próximos de determinado lugar 

Encontre os mares mais próximos a Taldikorgan, no Cazaquistão.

In[1]:=

X p = Entity["City", {"Taldikorgan", "Almaty", "Kazakhstan"}];

In[2]:=

X nearestseas = GeoNearest["Ocean", p, 5]

Out[2]=

Compute distâncias até os mares mais próximos daquele local.

In[3]:=

X nearestdistances = GeoDistance[p, nearestseas] // QuantityThread

Out[3]=

In[4]:=

X {minDist, maxDist} = nearestdistances[[{1, -1}]]

Out[4]=

Mapeie a distância até os mares. Taldikorgan é uma das cidades mais afastadas de qualquer mar. O disco interno se sobrepõe a um grande lago (o "Mar Cáspio"), mas não a um mar verdadeiro.

In[5]:=

X GeoGraphics[{EdgeForm[Gray], Brown, GeoDisk[p, minDist], GeoDisk[p, maxDist], AbsolutePointSize[5], Red, Point[p]}]

Out[5]=