- /
-
Colorful Sugar-loaf
on 8 Oct 2021
- 3
- 36
- 0
- 0
- 271
c=@(n)(mod(n,2)*(2*n+1)+n)/2;
s=@cumsum;
figure('Color','k')
plot([8 2],[-20 0],'w');hold;
cl=linspace(1,10,40);
scatter(30*rand(40,1)-25,9*rand(40,1)+5,[],cl);
for a=3:9:15000
while a(1)>1
a=[c(a(1)) a];
end
t=s(rescale(mod(a,3),-.45,.36));
scatter(s(cos(t+100)),s(sin(t+100)));
end
axis off
Image
