- /
-
Tipsy Dragon
on 12 Oct 2021
- 4
- 18
- 0
- 0
- 274
% Dragon
r = 4;
n = 6;
z = [0 1];
w = (1+i)/2;
for j = 0:n
cla
axis([-5,5,-5,5]*0.2,'square')
u = w*z;
v = 1 - w'*fliplr(z);
f = 1;
hold on
for k = 1:r
plot(f*u+rand(size(u))/20,'.-','linew',2,'markers',12);
plot(f*v+rand(size(v))/15,'-');
f = i*f;
end
hold off
z = [u v];
end
axis off
set(gcf,'Color',0.9*[1 1 1])