www.pudn.com > baojiading.rar > flower_plots.m, change:2009-03-04,size:436b


function flower_plots 
% flower petal plots 
theta=-pi:pi/300:pi; 
rho(1,:)=2*sin(5*theta).^2; 
rho(2,:)=cos(10*theta).^3; 
rho(3,:)=sin(theta).^2; 
rho(4,:)=5*cos(3.5*theta).^3; 
for i=1:4 
    polar (theta,rho(i,:)) 
    switch i 
         
    case 1 
         title 10-petal 
    case 2 
         title 20-petal 
    case 3 
         title 30-petal 
    case 4 
         title 2-3-2-unsymmetrical-petal 
    end 
    pause 
end