Descubra, manipule y compare fórmulas 

Encuentre ecuaciones para el desplazamiento Doppler en la frecuencia usando una consulta de lenguaje natural.

In[1]:=

X FormulaLookup["doppler shift frequency"]

Out[1]=

Obtenga una ecuación específica.

In[2]:=

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

Out[2]=

Defina funciones que resuelvan variables específicas de cantidad.

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

Compare fórmulas relativistas y no relativistas.

In[5]:=

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

Out[5]=