       Re: Trigonometric form of complex numbers

• To: mathgroup at smc.vnet.net
• Subject: [mg64190] Re: Trigonometric form of complex numbers
• From: Omega Consulting <info at omegaconsultinggroup.com>
• Date: Sat, 4 Feb 2006 04:13:47 -0500 (EST)
• References: <200602030603.BAA15931@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Expanding on that, you can have complex numbers printed in this form
by default. (Note, this only changes the printout. Internally, it's
still stored as a complex number.)

MakeBoxes[z_Complex, StandardForm] :=
ToBoxes[Abs[z] HoldForm[E]^(HoldForm[I] Arg[z]), StandardForm]

N[Solve[x^3 == -1, x]]
{{x -> -1.}, {x -> 1. E^(1.0472 I)}, {x -> 1. E^(1.0472 I)}}

----------------------------------------------
Omega Consulting
http://omegaconsultinggroup.com

On Feb 3, 2006, at 12:03 AM, Bob Hanlon wrote:

> polar[x_]:=Abs[x]*Exp[I*Arg[x]];
>
> polar/@(x/.Solve[x^3==-1,x])
>
> {-1, E^((I*Pi)/3), E^(-((I*Pi)/3))}
>
>
> Bob Hanlon
>
>>
>> From: ivan.svaljek at gmail.com
To: mathgroup at smc.vnet.net
>> Subject: [mg64190] [mg64166] [mg64158] Trigonometric form of complex numbers
>>
>> Is there a way to force mathematica to output complex numbers in
>> trigonometric form (I guess you call it Phasor).
>> Can it return all 3 roots of a complex number in such a form ?
>>
>> Thanks.
>>
>>

```

• Prev by Date: Notebooks, packages, cells, and literate programming
• Next by Date: Re: Problem to evaluate a function inside a function
• Previous by thread: Re: Trigonometric form of complex numbers
• Next by thread: Re: Trigonometric form of complex numbers