- /
-
Integer Step Circle
on 20 Oct 2021
- 2
- 15
- 0
- 0
- 278
K=25;
P = 1:K;
for i = 1:length(P)
C = 0:P(i);
hold on;
plot(i/2*cos(2*pi*C/P(i)),i/2*sin(2*pi*C/P(i)),'xg')
end
Lp = length(P);
P = P+K;
for i = 1:Lp
C = (Lp+1):P(i);
%hold on;
plot((i+Lp)/2*cos(2*pi*C/P(i)),(i+Lp)/2*sin(2*pi*C/P(i)),'or')
end
axis equal
set(gca,'XColor', 'none','YColor','none','color','k')