Eine Karte der Mondlandeplätze 

Erstellen Sie eine Liste der Apollo-Missionen und ihrer Landeplätze.

In[1]:=

X data = Sort@DeleteCases[MannedSpaceMissionData[ EntityClass["MannedSpaceMission", "ApolloMannedMission"], {"Entity", "LandingPosition"}], {_, _Missing}]

Out[1]=

Stellen Sie die Landeplätze auf einer Karte dar.

In[2]:=

X GeoGraphics[{Red, PointSize[.02], ({Point[#1[[2]]], Text[Framed[#1[[1]], Background -> LightYellow, RoundingRadius -> 5], #1[[2]], {0.3, -1.5}]} &) /@ Reverse[data]}, GeoModel -> Entity["PlanetaryMoon", "Moon"], GeoRange -> All, GeoProjection -> "Orthographic", Background -> Black, ImageSize -> Medium]

Out[2]=