Zoomez sur les séismes
Zoomez de manière interactive sur un tracé des tremblements de terre survenus au cours de l'année écoulée.
In[1]:=

eq = EarthquakeData[All, 6, {Today - Quantity[1, "Years"], Today},
"Position"]["Values"];
In[2]:=

DynamicGeoGraphics[GeoListPlot[eq]]
