地球の重力場の変化を調べる
地球表面の重力場は,物質密度における不均等性のため,そして地球が非球形であるため,さまざまな値を持つ.
以下は,地球表面の標準重力加速度である.
In[1]:=
![Click for copyable input](assets.ja/examine-variations-in-earths-gravitational-field/In_29.png)
g = UnitConvert[Quantity[1., "StandardAccelerationOfGravity"],
"SIBase"]
Out[1]=
![](assets.ja/examine-variations-in-earths-gravitational-field/O_21.png)
アメリカ合衆国における重力場の値の配列と標準重力加速度の差分を計算する.
In[2]:=
![Click for copyable input](assets.ja/examine-variations-in-earths-gravitational-field/In_30.png)
data = GeogravityModelData[Entity["Country", "UnitedStates"],
"DownComponent"] - g
Out[2]=
![](assets.ja/examine-variations-in-earths-gravitational-field/O_22.png)
データをアメリカ合衆国の地図上にプロットする.
完全なWolfram言語入力を表示する
Out[3]=
![](assets.ja/examine-variations-in-earths-gravitational-field/O_23.png)