with(plots):
macro(palegreen=COLOR(RGB, .7, .9, .7),paleyellow=COLOR(RGB,.9,.9,.6),lavendar=COLOR(RGB,.9,.7,1), skyblue=COLOR(RGB,.7,.8,1));
polarplot(cos(x),x=0..2*Pi);
polarplot(2*cos(x),x=0..2*Pi);
polarplot(cos(2*x), x=0..2*Pi);
polarplot(cos(3*x),x=0..2*Pi, scaling=constrained);
polarplot(cos(3*x)+3,x=0..2*Pi, scaling=constrained);
polarplot(cos(3*x+Pi/4), x=0..2*Pi, scaling=constrained);
polarplot(3,x=0..2*Pi);
polarplot(1-2*sin(x), x=0..2*Pi);
One leaf of the four-leaf clover
polarplot(3*sin(2*theta),theta=0..2*Pi);
polarplot(3*sin(2*theta),theta=0..Pi);
polarplot(3*sin(2*theta),theta=0..Pi/2);
animatecurve([sin(4*theta),theta,theta=0..2*Pi], coords=polar, numpoints=100, frames=50, scaling=constrained);
int((sin(4*theta))^2,theta=0..Pi/4);