Den globalen Kontext eines Ortsplans darstellen 

Stellen Sie das Gebiet rund um den Titicacasee auf einem Ortsplan und einer Weltkarte dar.

Die gesamte Wolfram-Language Eingabe zeigenEingabe verbergen

In[1]:=

X position = Entity["Lake", "LakeTiticaca"]["Position"];

In[2]:=

X overview = GeoGraphics[{Opacity[0.2], FaceForm[Black], EdgeForm[Directive[White, Thick]], Rectangle[ GeoDestination[position, {Quantity[Sqrt[2]*500, "Miles"], 225}], GeoDestination[position, {Quantity[Sqrt[2]*500, "Miles"], 45}]], Opacity[1], GrayLevel[0.6], Thick, GeoPath[{"Meridian", position[[1, 2]]}], GeoPath[{"Parallel", position[[1, 1]]}], Blue, PointSize[Large], Point[position]}, GeoProjection -> "Orthographic", GeoRange -> "World", GeoCenter -> position, GeoBackground -> GeoStyling["StreetMapNoLabels", GeoStylingImageFunction -> (ImageAdjust[#, {0, 0.2, 5}] &)], GeoGridLines -> {Quantity[20, "AngularDegrees"], Quantity[20, "AngularDegrees"]}, GeoGridLinesStyle -> Directive[Thin, GrayLevel[0.8, 0.4]]]

In[3]:=

X GeoGraphics[{Blue, PointSize -> Large, Point[position], Inset[overview, {-74, -20.2}, {0, 0}, 5]}, GeoCenter -> position, GeoRange -> Quantity[500, "Miles"]]

Out[3]=