Question: Complex(polynomial) mapping

Hi guys, 

I want to know how to write 2 procedures in order to  construct 2 different complex mappings with polynomials of degree 4 and 5 and tell what the pictures really mean.

Can anyone suggest me or give me hints on how to do this? 

One way I know is to construct meldelbrot as follow: 

mandelbrot:=proc(x,y)

localz,ct,xn,xnold,yn,iter:

Iter:=25:Digits:=10:xn:=x:yn:=y:

for ct from 1 to iter while xn^2+yn^2

xnold:=xn:

xn:=evalhf(xn^2 -yn^2 +x):

yn:=evalhf(2*xnold*yn+y):

end do:

1- (ct/iter):

end proc;

 

Please Wait...