I have a list with complex numbers and I want to animate them. How can i do this? I would like to have appearing lines between points. I hope you know what I mean. Here is my code:
roots[re_, im_, n_] :=
Module[{a = re, b = im, zkList, phi, zk, k, IM, RE, zkList2, p,
number},
number = a + I*b;
zkList =
Table[{Power[Abs[re + im*I], (
n)^-1]*(Cos[(Arg[re + im*I] + 2*k*Pi)/n]) +
I*Sin[(Arg[re + im*I] + 2*k*Pi)/n]}, {k, 0, n - 1}];
zkList]
Example:
roots[1, 0, 4]
{1, I, -1, -I}