ParametricPlot[{Cos[t] Cos[17t],Sin[t] Cos[17t]},{t,0,2Pi}]
