Novas divisões para a lua

A versão 11 inclui um conjunto melhorado de divisões da lua, com zooms de 1 a 9.

Esta é a localização do local de pouso da missão Apollo 15.

In[1]:=

landing = Entity["MannedSpaceMission", "Apollo15"][ EntityProperty["MannedSpaceMission", "LandingPosition"]]

Out[1]=

Trace um marcador geográfico em um mapa ortográfico do lado mais próximo da Lua.

In[2]:=

GeoGraphics[GeoMarker[landing], GeoProjection -> "Orthographic", GeoRange -> All, GeoGridLines -> Quantity[20, "AngularDegrees"], GeoGridLinesStyle -> Directive[Opacity[0.3], LightBlue], Background -> Black]

Out[2]=

O local de pouso está localizado perto do extremo leste do Mare Imbrium.

In[3]:=

GeoGraphics[GeoMarker[landing], GeoProjection -> "Orthographic", GeoRange -> All, GeoGridLines -> Quantity[20, "AngularDegrees"], GeoGridLinesStyle -> Directive[Opacity[0.3], LightBlue], Background -> Black]; Show[%, GeoRange -> Quantity[200, "Miles"], GeoGridLines -> Quantity[2, "AngularDegrees"]]

Out[3]=

Aumente o zoom.

In[4]:=

landing = Entity["MannedSpaceMission", "Apollo15"][ EntityProperty["MannedSpaceMission", "LandingPosition"]]; Show[%, GeoRange -> Quantity[200, "Miles"], GeoGridLines -> Quantity[2, "AngularDegrees"]]; Show[%, GeoRange -> Quantity[15, "Miles"], GeoGridLines -> Quantity[.2, "AngularDegrees"]]

Out[4]=