Hallo Wolfgang
Danke für Deinen Hinweis.
Mit SetAccuracy habe ich in der Vergangenheit schlechte Erfahrungen gemacht.
Bei größeren Problemen wird dann MMA schnell instabil. Bei 4.1 habe ich das
noch nicht ausprobiert, wenn ich mal Zeit habe...
Sonst gefällt mit die Lösung von Arnd Roth mit $MachineEpsilon am besten.
Gruß, Peter Klamser
-----Ursprüngliche Nachricht-----
Von: Wolfgang Ludwig [mailto:w.ludwig@XXXXXXX.de]
Gesendet: Donnerstag, 15. März 2001 10:51
An: Klamser, Peter
Cc: DMUG
Betreff: Re: ganz einfach, sehr eigenartig => f[h_, dh_] = Floor[N[h/dh]]
Hallo Peter
das hängt vielleicht damit zusammen. dass die Schritte in den Tabellen
ungenau sind.
Probiere mal
SetAccuracy[Table[{h, h/(h/2),Floor[h/(h/2)]}, {h, 1, 2, 0.05}], 30] //
MatrixForm
Was tadellos funktioniert ist:
SetAccuracy[Table[{h, h/(h/2),Floor[h/(h/2)]}, {h, 1, 2, 1/20}], 30] //
MatrixForm
Unverständlich ist auch:
Table[{h, h/(h/2),Floor[h/(h/2)]}, {h, 1, 2, SetPrecision[0.05,30]}] //
MatrixForm
Warum ist Floor[2.00000000000000000000000000000] 1 statt 2?
Noch schlimmer:
Floor[2.00000]
2
Floor[2.0000000000]
2
Floor[2.000000000000000]
2
Floor[2.00000000000000000000]
1
Floor[2.00... mit <17 Stellen] ergibt 2
Floor[2.00... mit >17 Stellen] ergibt 1
Wirklich höchst merkwürdig
Gruss
Wolfgang
Klamser@XXXXXXX.de schrieb:
Hallo,
eine ganz einfach Funktion:
f[h_, dh_] = Floor[N[h/dh]]
Wenn ich z.B. f[h, h 0.5 ] eingebe sagt MMA (4.1) mit dass da 2 rauskommt.
Sehr guuut!.
Eigentlich müsste immer 2 rauskommen :-)
Der Test
Table[f[h, h 0.5 ], {h, 0, 2, 0.01}]
ergibt aber:
{Indeterminate, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2,
\
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, \
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2,
1, \
1, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2,
2, \
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, \
2, 2, 1, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 1, 2, 1, 2, 2, 2,
2, \
2, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 2, 1, 2, 2, 2, 2, 2, 1, 2, 2, 1, 2,
2, \
2, 2, 2, 2, 2, 1, 1, 2, 1, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 1, 2}
Ich beschwere mich nicht über das Indeterminate (da 0/0).
Aber warum kommt da 1 raus?
Gruß, Peter Klamser
--
=============================
Dr. Wolfgang Ludwig
managing director
STL Systemtechnik Ludwig GmbH
Max-Stromeyer-Str. 116
D-78467 Konstanz
7531-892888-0 (phone)
7531-892888-88 (fax)
www.stl-gmbh.de
=============================