一,用matlab绘制菊花
在command窗口复制下列代码,按回车运行即可
%data base
t0=linspace(0,2*pi);
for i=1:100
if rem(i,4)==0
t1(i)=NaN
else t1(i)=t0(i)
end
if rem(i,4)==2
t2(i)=NaN
else t2(i)=t0(i)
end
end
p=linspace(0,0.25*pi);
[xx,yy]=meshgrid(-2:0.05:2);
[xxx,yyy]=meshgrid([0.01 0.01]);
%drawing process
for i=1:10
if rem(i,2)==0
a=t1
elseif rem(i,2)==1
a=t2
end
b=p
[a,b]=meshgrid(a,b)
q=i*cos(1.25*b).*sin(b)
[x,y,z]=sph2cart(a,b,q);
z=(7.5/i+0.25)*z
surf(x,y,z,31*ones(size(z)))
hold on
end
h=0.25*cos(2.5*(xx.^2+yy.^2).^0.5)+0.14;
surf(xx,yy,h,26*ones(size(