| Frühere | Chronologischer Index | Spätere | ||
| Vorherige | Thematischer Index | Nächste |
> Needs["Statistics`NonlinearFit`"]
> ft = Table[N[1 + 2 Exp[-x/3] + 10 Random[]], {x, 100}];
> fn = a + b Exp[-x c]
> c = NonlinearFit[ft, fn, x, {a, b, c}]
>
>
>
> mathematica zeigt als ergebnis :5.83426+3.56798*exp[-x*0.18...]
> ist als ergebnis also unbrauchbar.
Schau Dir ListPlot[ft] an und überleg' mal, ob Mathematica
(oder irgendein anderes Programm) Dir je ein besseres
Ergebnis liefern könnte.
Gruß,
Thomas Hahn
| Frühere | Chronologischer Index | Spätere | ||
| Vorherige | Thematischer Index | Nächste |
DMUG-Archiv, http://www.mathematica.ch/archiv.html