|
|
|
|
|
|
|
|
Spline Anpassungen mittels einer kubischen Interpolation werden zur stückweisen Approximation von Kurven verwendet. Die Daten sollten als zweispaltige Tabelle vorliegen. Als Trennzeichen zwischen den Zahlenwerten sind Trennzeichen erlaubt.
data=ReadList["Dateiname",Number, RecordLists->True]
Needs["NumericalMath`SplineFit`"]
curve=SplineFit[data,Cubic]
n= (* Zahl der Meßpunkte *)
g=ParametricPlot[curve[t],{t,0,n},Compiled->False]
g1=ListPlot[data,PlotStyle->PointSize[0.03]]
Show[g,g1]
