1
正如我告诉我,我是新来的Perl。我工作在复杂的号码, 我用如何访问perl中复数的实部和虚部?
use Math::Complex;
为复数, ,这是我的代码,
for($k=0;$k<$N;$k++)
{
$c[k]= Math::Complex->new(0,0);
for ($n=0;$n<($N-1);$n++)
{
$c[k]=$c[k] + ($we[($k * $n)% $N] * $y[n]) ;
}
}
现在如何访问只有真正的零件或复数的虚部?