- /
-
Butterfly_remix
on 10 Oct 2022
- 5
- 6
- 1
- 0
- 280
t=0:.001:2*pi;
x=16*sin(t).^3;
f=@cos;
y=(14*f(t)-6*f(2*t)-2*f(3*t)-f(4*t)).^1/3;
m=min(y);
hold on
axis equal off
s='k';
for i=0:.01:1
h=y*i-m;
g=x*i+m;
plot(h,g,-h,g,Col=[0,0,1-i^4])
end
for j=0:4
plot(0,-4-2*j,'o',MarkerFaceC=s,MarkerS=30-2*j,MarkerE='n')
end
k=0:.1:3;
l=2*k-3;
plot(-k,l,s,k,l,s,LineW=2)