Nuevas baldosas para la Luna
La versión 11 agrega un conjunto mejorados de baldosas para la Luna, con ampliaciones de 1 a 9.
Ésta es la ubicación del sitio de aterrizaje de la misión de Apolo 15.
In[1]:=
landing =
Entity["MannedSpaceMission", "Apollo15"][
EntityProperty["MannedSpaceMission", "LandingPosition"]]
Out[1]=
Represente gráficamente un marcador geográfico en un mapa ortográfico del lado cercano de la Luna.
In[2]:=
GeoGraphics[GeoMarker[landing], GeoProjection -> "Orthographic",
GeoRange -> All, GeoGridLines -> Quantity[20, "AngularDegrees"],
GeoGridLinesStyle -> Directive[Opacity[0.3], LightBlue],
Background -> Black]
Out[2]=
El sitio de aterrizaje está ubicado cerca del eje este del 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]=
Amplifique aún más.
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]=