Back to Gallery
  • Remix
  • Share
  • New Entry
on 19 Oct 2022
  • 6
  • 19
  • 0
  • 0
  • 251
%credit"taoizm"
c=@(n)(mod(n,2)*(2*n+1)+n)/2;
s=@cumsum;
figure('Color','k','Renderer','painters')
hold on
for a=3:16:1e5
while a(1)>1
a=[c(a(1)) a];
end
t=s(rescale(mod(a,2),-.09,.08));
%plot(s(cos(t)),s(sin(t)),'Color',[0 0 0 .1]);
rng(9);m=rand;n=rand;
plot(s(m*sin(t)),s(m*cosh(2*n*t)),'Color',[.8 .1 .1 .1]);
end
axis equal off
Remix Tree