- /
-
The Joker
on 28 Oct 2021
- 9
- 43
- 1
- 0
- 236
%Joker
close all
clear
col=9
r=10;
m=800 %800 or 1200
cx=.1;
cy=0;
l=1.1; %L=2 is normal
n=0.4 %org
x=linspace(cx-l,cx+l,m); % x=[-5 5]
y=linspace(cy-l,cy+l,m); %y=[-5 5]
[X,Y]=meshgrid(x,y);
Z=zeros(m);
C=X+i*Y;
for k=1:r
%Z=Z.^n+C;
Z= exp(Z + atanh(1./n.^C)); %ok joker
W=exp(-abs(Z)); %comp
end
%pcolor(W);
pcolor(rot90(W,3)); %Looks
shading interp;
axis off
colormap(turbo)