- /
-
Chaos game inside a regular enneadecagon with mixed rules superimposed
on 31 Oct 2021
- 4
- 31
- 1
- 0
- 269
n=9e3;
P=nsidedpoly(19);
M=P.Vertices;
r=@randi;
figure('Color','#E7d2CC');
hold on;
F=zeros(n,2,5);
p=[0,0];
s=0;
for j=5:18
for i=1:n
R=r(19);
while s==R
R=r(19);
end
q=M(R,:);
s=R;
p=(p+q)/j;
F(i,:,j)=p;
end
plot(F(:,1,j),F(:,2,j),'Col','#787D7F','LineS','n','Marker','.','MarkerS',1);
end
axis equal off;