Formeln ermitteln, manipulieren und vergleichen 

Ermitteln Sie Gleichungen für die Doppler-Frequenzverschiebung mit Eingabe in natürlicher Sprache.

In[1]:=

X FormulaLookup["doppler shift frequency"]

Out[1]=

Ermitteln Sie eine spezifische Gleichung.

In[2]:=

X FormulaData[{"DopplerShift", "Frequency"}]

Out[2]=

Definieren Sie Funktionen, die nach bestimmten Größenvariablen lösen.

In[3]:=

X doppler[v_] := Last@FormulaData[{"DopplerShift", "Frequency"}, {QuantityVariable[ \!\(\*SubscriptBox[\("f"\), \("s"\)]\),"Frequency"] -> Quantity[400, "Megahertz"], QuantityVariable[ \!\(\*SubscriptBox[\("v"\), \("s"\)]\),"Speed"] -> v, "c" -> Quantity[1, "SpeedOfLight"]}]

In[4]:=

X dopplerrelativistic[v_] := Last@FormulaData[{"DopplerShiftRelativistic", "Frequency"}, {QuantityVariable[ \!\(\*SubscriptBox[\("f"\), \("s"\)]\),"Frequency"] -> Quantity[400, "Megahertz"], QuantityVariable[ \!\(\*SubscriptBox[\("v"\), \("s"\)]\),"Speed"] -> v}]

Vergleichen Sie relativistische und nichtrelativistische Formeln.

In[5]:=

X Plot[{doppler[Quantity[v, "SpeedOfLight"]], dopplerrelativistic[Quantity[v, "SpeedOfLight"]]}, {v, 0, 0.9}, Frame -> True, FrameLabel -> Automatic]

Out[5]=