Gemischte Größen
Gemischte Größen treten in vielen Kontexten auf: Geld, Zeit, Distanz, Gewicht, Winkel etc.
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]=

Die Funktion SiderealTime gibt eine gemischte Größe zurück. Ermitteln Sie die aktuelle Sternzeit Ihres Standorts.
In[5]:=

stime = SiderealTime[]
Out[5]=

Ermitteln Sie den aktuellen Stand der Sonne in Äquatorialkoordinaten.
In[6]:=

sunpos = SunPosition[CelestialSystem -> "Equatorial"]
Out[6]=

Berechnen Sie den Stand des Mondes im selben Koordinatensystem.
In[7]:=

moonpos = MoonPosition[CelestialSystem -> "Equatorial"]
Out[7]=

Ermitteln Sie die Rektaszensionskoordinaten der Planeten.
In[8]:=

planetpos =
QuantityMagnitude[
DeleteMissing[
EntityValue[EntityClass["Planet", All],
EntityProperty["Planet", "RightAscension"]]],
"HoursOfRightAscension"]
Out[8]=

Kombinieren Sie die unterschiedlichen Positionsmessungen zu einer Liste der Rektaszensionsdaten für jeden Himmelskörper.
In[9]:=

ascensions = Join[ {0, moonpos[[1, 1]] - sunpos[[1, 1]]}, planetpos];
Den kompletten Wolfram Language-Input zeigen
Erstellen Sie eine Graphik der Positionen der Planeten sowie von Sonne und Mond, so wie sie vom Südpol aus gesehen werden.
Den kompletten Wolfram Language-Input zeigen
Out[11]=
