Examinez les variations dans le champ gravitationnel de la Terre

Le champ de gravitation à la surface de la Terre varie à cause des défauts d'homogénéité de la densité de la matière et de la forme non sphérique de la Terre.

Voici la valeur moyenne standard du champ à la surface de la Terre.

In[1]:=

g = UnitConvert[Quantity[1., "StandardAccelerationOfGravity"], "SIBase"]

Out[1]=

Calculez la différence entre un tableau de valeurs pour le champ gravitationnel au-dessus des États-Unis et la valeur moyenne standard.

In[2]:=

data = GeogravityModelData[Entity["Country", "UnitedStates"], "DownComponent"] - g

Out[2]=

Tracez les données sur une carte des États-Unis.

In[3]:=

plot = ListContourPlot[data, Frame -> False, PlotRangePadding -> 0, ColorFunction -> "TemperatureMap"]; Legended[GeoGraphics[{GeoStyling[{"GeoImage", plot}, Opacity[0.8]], Polygon[Entity["Country", "UnitedStates"]]}], BarLegend[{"TemperatureMap", MinMax@Flatten[QuantityMagnitude@data]}]]

Out[3]=