Wolfram Language™

Examine variaciones en el campo gravitacional de la Tierra

El campo gravitacional en la superficie de la Tierra varía debido a la falta de homogeneidad en la densidad de la materia y a la forma no esférica de la Tierra.

Este es el valor promedio estándar del campo en la superficie de la Tierra.

In[1]:=

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

Out[1]=

Calcule la diferencia entre un arreglo de valores del campo gravitacional sobre los EE.UU. y el valor promedio estándar.

In[2]:=

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

Out[2]=

Represente gráficamente los datos en un mapa de los EE.UU.

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]=