In[12]:=
ExpForm := Sqrt[Im[#1]^2 + Re[#1]^2]*Exp[ToString[-(I*ArcTan[Re[#1], Im[#1]])]] &
(*
so wirds verwendet,
zahl ist es dann aber keine mehr,
mit Hold[] oder so etwas ähnlichem,
anstatt String[] könnts vieleicht eine zahl bleiben
*)
2.-3.I//ExpForm
-----Original Message-----
From: dieter.palme@XXXXXXX.com [mailto:dieter.palme@XXXXXXX.com]
Sent: Thursday, March 20, 2003 1:23 PM
To: dmug@XXXXXXX.ch
Subject: Komplexe Zahlen in der Form a Exp[I b]
Hallo Gruppe,
wie kann ich MM4 dazu überreden, die Ausgabe einer komplexen Zahl immer in der Exponentialform zu machen?
m1={{.694Exp[I 54.4 Degree], .721Exp[I 49.8 Degree]},{.724 Exp[I 130.2 Degree], .689 Exp[-I 54.4 Degree]}}//
MatrixForm; m1ev=Eigenvectors[m1]
und dann möge bitte nicht dastehen:
{ 0.898015 + 0. I , 0.335592 + 0.284513 I}
out: = {
}
{-0.335369 + 0.282496 I , 0.898735 + 0. I }
sondern bitte:
{0.898015 Exp[ I 0° ] , 0.439965 Exp[ I 40.2911° ] }
out: = {
}
{0.438493 Exp[ I 139.891° ] , 0.898735 Exp[ I 0 ° ] }
MfG
Dipl. Phys. Dieter Palme
Research Scientist
Fiberoptic
Tektronix Munich GmbH
Gauss Strasse 11
D-85757 Karlsfeld
Germany
mailto:dieter.palme@XXXXXXX.com
Off: +49 (0)8131 5956-0
Tel: +49 (0)8131 595635
Fax: +49 (0)8131 595699
Mob: +49 (0)177 8066318
http://www.tektronix.com
Tektronix
Enabling Innovation