- /
-
The Atom
on 6 Oct 2021
- 67
- 167
- 0
- 0
- 279
S=@scatter;
R=@(t)[cos(t) -sin(t);sin(t) cos(t)];
N=NaN(2,1);
t=0:.0634:2*pi;
p=[8*cos(t);4*sin(t)];
p=[p N R(pi/4)*p N R(3*pi/4)*p N];
i=[85;125;275];
l=.5;
f='f';
hold on
plot(p(1,:),p(2,:),'k')
S(p(1,i),p(2,i),'r',f)
S([-l l -l l],[l l -l -l],99,'g',f)
S([-l 0 l 0 0],[0 0 0 -l l],99,'b',f)
axis off