- /
-
Water World
on 14 Oct 2021
- 12
- 23
- 0
- 0
- 238
%favorite movie
close all
clear
col=20;
r=10;
m=400;
cx=0.25;
cy=0;
z=10
l=0.49;
x=linspace(cx-l,cx+l,m);
y=linspace(cy-l,cy+l,m);
[X,Y]=meshgrid(x,y);
Z=zeros(m)+eps;
C=X+i*Y;
for k=1:col;
Z=Z.^(Z-.9)+C;
W=exp(-abs(Z));
end
colormap jet(512);
pcolor(flipud(W'));
shading flat;
axis equal off