Просмотр распределения землетрясений: Новое в системе Wolfram Language 11

Просмотр распределения землетрясений

Графически изобразите частоту землетрясений в мире за 10 лет.

In[1]:=

events = Quiet@
   EarthquakeData[All, 
     5, {DateObject[{2006, 1, 1}], DateObject[{2015, 12, 31}]}, 
     "Position"]["Values"];

In[2]:=

GeoHistogram[events, 50, GeoRange -> "World", 
 PlotLegends -> Automatic, ImageSize -> 500]

Out[2]=

Азимутальная проекция Ламберта сохраняет площадь, поэтому все шестигранники представляют одинаковую площадь поверхности на Земле. Здесь карта сцентрирована на середине вулканического пояса Тихого океана, где происходит большинство землетрясений в мире.

In[3]:=

GeoHistogram[events, 40, GeoRange -> "World", 
 PlotLegends -> Automatic, 
 GeoProjection -> {"LambertAzimuthal", 
   "Centering" -> GeoPosition[{0, 180}]}, ImageSize -> 500]

Out[3]=