- /
-
dandelion
on 7 Oct 2021
- 67
- 100
- 2
- 0
- 279
c=@(n)(mod(n,2)*(2*n+1)+n)/2;
s=@cumsum;
figure('Color','k')
plot([8 2],[-20 0],'w');hold;
plot(30*rand(40,1)-25,9*rand(40,1)+5,'w*','MarkerSize',23);
for a=3:9:35000
while a(1)>1
a=[c(a(1)) a];
end
t=s(rescale(mod(a,3),-.45,.36));
plot(s(cos(t+100)),s(sin(t+100)),'Color',[1 1 1 .1]);
end
axis off