Увеличение масштаба на землетрясениях
Интерактивно увеличьте масштаб на графике землетрясений, произошедших за последний год.
In[1]:=
eq = EarthquakeData[All, 6, {Today - Quantity[1, "Years"], Today},
"Position"]["Values"];
In[2]:=
DynamicGeoGraphics[GeoListPlot[eq]]