- /
-
Shock Wave Part 3
on 24 Oct 2021
- 8
- 18
- 4
- 0
- 280
%Fractal Zeta
l=@linspace;
r=3; %No Loop,
m=600;
L=.349; %L
n=1; %orig 1
x=l(.2-L,L,m); % x=[-5 5]
y=l(.1-L,L+.1,m); %y=[-5 5]
[X,Y]=meshgrid(x,y);
Z=zeros(m);
C=X+i*Y;
for k=1:r
f=asin(C.^(tan(((conj((Z)+C.^2))+C.^2).^n)));
Z=atanh(sqrt(((C.^(sqrt(asinh(tan(log10((f.^f).^n)))))).^C)+C.^2));%
end
%W=abs(Z);
pcolor(abs(Z)); %Looks like
shading interp
colormap(hot(88))
brighten(.2)
axis off