我想以三角形式显示复数。例如:
z = (-4)^(1/4);
我不确定它的命令是什么,写起来很愚蠢:
我想,命令是ExpToTrig
,但解决方案不可能只是1+i
(或者可以,我在滥用它?)。如何以三角形式显示复数。
编辑:
命令是ExpToTrig
,它只是没有给出所有的解决方案(或者我没有找到方法)。终于解决了我编写纯函数的问题NrootZpolar[n][z]
:
NrootZpolar :=
Function[x,
Function[y,
( Abs[y] ^ (1/x) *
( Cos[((Arg[y] + 360° * Range[0, x - 1]) / x)] +
I*Sin[((Arg[y] + 360° * Range[0, x - 1]) / x)]))
]
]
并使用:
In[689]:= FullSimplify[NrootZpolar1[4][-4]]
Out[689]= {1 + I, -1 + I, -1 - I, 1 - I}
可视化:
ComplexListPlot[list_] := ListPlot[Transpose[{Re[list], Im[list]}], AxesLabel -> {Re, Im}, PlotLabel -> list, PlotMarkers -> Automatic]
Manipulate[ComplexListPlot[FullSimplify[NrootZpolar1[n][z]]], {z, -10, 10}, {n, 1, 20}]