The Rhodonea Curves
(which have polar equations r=a Sin[kθ])

In[30]:=

f[θ_] = a * Sin[k * θ] * Cos[θ]

g[θ_] = a * Sin[k * θ] * Sin[θ]

Out[30]=

a Cos[θ] Sin[k θ]

Out[31]=

a Sin[θ] Sin[k θ]

In[105]:=

a = 4 ;

Created by Mathematica  (February 22, 2007) Valid XHTML 1.1!