Увеличение масштаба на землетрясениях
Интерактивно увеличьте масштаб на графике землетрясений, произошедших за последний год.
In[1]:=
![Click for copyable input](assets.ru/zoom-in-on-earthquakes/In_13.png)
eq = EarthquakeData[All, 6, {Today - Quantity[1, "Years"], Today},
"Position"]["Values"];
In[2]:=
![Click for copyable input](assets.ru/zoom-in-on-earthquakes/In_14.png)
DynamicGeoGraphics[GeoListPlot[eq]]
![](assets.ru/zoom-in-on-earthquakes/swf_2.png)