Daten in Verbindung mit physikalischen Größen interpolieren 

Erzeugen Sie eine Interpolationsfunktion mithilfe von Quantity-Daten.

In[1]:=

X data = Table[{Quantity[i, "Seconds"], Quantity[1 - 8 (i/10)^2 + 8 (i/10)^4, "Pounds"]}, {i, 0, 10}] ; if = Interpolation[data]

Out[1]=

In[2]:=

X Plot[if[Quantity[t, "Seconds"]], {t, 0, 10}]

Out[2]=

Die Eingabe der Interpolationsfuktion kann jede beliebige kompatible Größe in Verbindung mit den Abszissdaten sein.

In[3]:=

X if[Quantity[3, "Seconds"]]

Out[3]=

In[4]:=

X if[Quantity[0.1, "Minutes"]]

Out[4]=

In[5]:=

X if[Quantity[0.001, "Hours"]]

Out[5]=

Stellen Sie die Interpolationsfunktion graphisch dar.

In[6]:=

X input = Quantity[Range[0, 0.15, 0.15/100], "Minutes"]; ListLinePlot[Transpose[{input, if[input]}], AxesLabel -> Automatic]

Out[6]=