Язык Wolfram Language

Геоданные

Магнитное поле Земли

Рассмотреть протяжённость геомагнитного поля по всей планете.

In[1]:=
Click for copyable input
plot = ListContourPlot[ GeomagneticModelData[{{-90, -180.}, {90, 180.}}, "Magnitude", GeoZoomLevel -> -2], Frame -> False, PlotRangePadding -> 0, ColorFunction -> "TemperatureMap"];
In[2]:=
Click for copyable input
GeoGraphics[{GeoStyling[{"GeoImage", plot}], Opacity[0.4], Polygon[GeoPosition[{{-90, -180}, {90, -180}, {90, 180}, {-90, 180}}]]}]
Out[2]=

Родственные примеры

de en es fr ja ko pt-br zh