[Fwd: Re: Komplexe Zahlen in der Form a Exp[I b]]

[Jens-Peer Kuska <kuska@XXXXXXX.de>]

Hallo,

also das geht so nicht, weil Mathematica eine komplexe 
a*Exp[I*phi] sofort auswertet, und weil das Atom mit dem
Head[] Complex viel einfacher ist als  
Times[a,Exp[Times[Complex[0,1],b]]]
macht es alle  Umformungen mit

Eigenvectors[m1] /. 
  a_Complex :> (Print["Hu hu"]; Sqrt[Conjugate[a]*a]*Exp[-I*Arg[a]])

gleich wieder r"uckg"angig. Das beste ist es einfach "exp" statt "Exp"
zu
schreiben und

ev=Eigenvectors[m1] /. 
  a_Complex :> Chop[Sqrt[Conjugate[a]*a]*exp[-I*Arg[a]]]

mit 

ev /. exp ->Exp

wird man dies dann wieder los.

Bleibt noch das Degree, das wird n"amlich in Gleitkomma-
ausdr"ucken mit dem numerische Wert

Pi/180 ersetzt was man an der Ausgabe von 2.*Degree sieht.

Eine Variante w"are also

Eigenvectors[m1] /. 
  a_Complex :> 
    Chop[Sqrt[Conjugate[a]*a]*
        exp[-I *Rationalize[Arg[a]/Degree , 10^-16]*Degree]]

Gruss
  Jens


dieter.palme@XXXXXXX.com wrote:
> 
> 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