混合数量
混合数量は,金銭,時間,距離,重さ,角度等,多数のコンテキストに見られる.
In[1]:=
Quantity[MixedMagnitude[{2, 35, 21.2}],
MixedUnit[{"Hours", "Minutes", "Seconds"}]]
Out[1]=
In[2]:=
UnitConvert[Quantity[75.562, "AngularDegrees"],
MixedUnit[{"AngularDegrees", "ArcMinutes", "ArcSeconds"}]]
Out[2]=
In[3]:=
Quantity[MixedMagnitude[{5, 11}], MixedUnit[{"Feet", "Inches"}]]
Out[3]=
In[4]:=
Quantity[MixedMagnitude[{5, 11}], MixedUnit[{"Feet", "Inches"}]];
% + Quantity[2.5, "Feet"]
Out[4]=
関数SiderealTimeは混合数量を返す.ユーザの現在位置における恒星時を求める.
In[5]:=
stime = SiderealTime[]
Out[5]=
太陽の現在位置を赤道座標系で求める.
In[6]:=
sunpos = SunPosition[CelestialSystem -> "Equatorial"]
Out[6]=
月の位置を同じ座標系で計算する.
In[7]:=
moonpos = MoonPosition[CelestialSystem -> "Equatorial"]
Out[7]=
惑星の赤経座標を求める.
In[8]:=
planetpos =
QuantityMagnitude[
DeleteMissing[
EntityValue[EntityClass["Planet", All],
EntityProperty["Planet", "RightAscension"]]],
"HoursOfRightAscension"]
Out[8]=
さまざまな位置の測度値を組み合せ,各天体の赤経のリストを作る.
In[9]:=
ascensions = Join[ {0, moonpos[[1, 1]] - sunpos[[1, 1]]}, planetpos];
完全なWolfram言語入力を表示する
南極から見た惑星,太陽,月の位置のグラフィックビューを作る.
完全なWolfram言語入力を表示する
Out[11]=