数学的浪漫

绘制爱心动图

脚本文件：

clc
clear all
a=1:0.1:30;
for i=1:(30-1)/0.1+1
x=-2:0.01:2;
y=power(abs(x),2/3)+0.9*power(3.3-x.^2,1/2).*sin(a(i)*pi*x);
plot(x,y,'r');
title('y=power(abs(x),2/3)+0.9*power(3.3-x.^2,1/2).*sin(a(i)*pi*x)');
ylim([-2 2.5]);
xlim([-2 2]);
pause(0.05);
end

可以通过改变a或者停止时间来控制闪动速度。