Hallo Herr Klamser,
drklist =
\!\(\*
RowBox[{"{",
RowBox[{\({0, 1.9217622685345883`}\),
",", \({0.1`, 1.9524045641258994`}\),
",", \({0.2`, 1.9831154639946011`}\),
",", \({0.30000000000000004`, 2.0138179946371295`}\),
",", \({0.4`, 2.044429458493233`}\),
",", \({0.5`, 2.0748620355436267`}\),
",", \({0.6000000000000001`, 2.1050235761812193`}\),
",", \({0.7000000000000001`, \
\(\(2.134818582642467`\)\(\[InvisibleSpace]\)\) -
1.869048332960343`*^-15\ \[ImaginaryI]}\),
",", \({0.8`, \(\(2.164149366177148`\)\(\[InvisibleSpace]\)\) -
3.097010730781704`*^-14\ \[ImaginaryI]}\),
",", \({0.9`, \(\(2.1929173562642212`\)\(\[InvisibleSpace]\)\) -
1.4499952823674634`*^-13\ \[ImaginaryI]}\), ",",
RowBox[{"{",
RowBox[{"1.`", ",",
InterpretationBox["ComplexInfinity",
DirectedInfinity[ ]]}], "}"}]}], "}"}]\)
drklist // MatrixForm // Chop
\!\(\*GridBox[{
{"0", "1.9217622685345883`"},
{"0.1`", "1.9524045641258994`"},
{"0.2`", "1.9831154639946011`"},
{"0.30000000000000004`", "2.0138179946371295`"},
{"0.4`", "2.044429458493233`"},
{"0.5`", "2.0748620355436267`"},
{"0.6000000000000001`", "2.1050235761812193`"},
{"0.7000000000000001`", "2.134818582642467`"},
{"0.8`", "2.164149366177148`"},
{"0.9`", "2.1929173562642212`"},
{"1.`",
InterpretationBox["ComplexInfinity",
DirectedInfinity[ ]]}
}]\)
Ich nehme an, dass Plot die kleinen i^-13 und kleiner bei 0.7, 0.8 und 0.9
per Chop eliminiert. Für fast 1 kommt die Fehlermeldung:
Plot::"plnr": "\!\(drk[f]\) is not a machine-size real number at \!\(f\) =
\!\
\(0.9999999583333333`\)."
Beste Grüße,
Matthias Bode.
-----Ursprüngliche Nachricht-----
Von: Klamser@XXXXXXX.de [mailto:Klamser@XXXXXXX.de]
Gesendet: Sonntag, 1. September 2002 22:16
An: Dmug@Mathematica. Ch
Betreff: Complex
Hallo,
kann mir jemand sagen, warum die im anliegenden NB aufgeführte Funktion
geplottet weren kann, als Liste aber nur komplexe Ergebnisse mit einem
imaginären Teil von 0. oder 10^-14 liefert?
Gruß,
Peter Klamser