ParametricPlot[{ 2*Sin[t]-Sin[2*t], 2*Cos[t]-Cos[2*t]}, {t,0,2*PI}]

Uh oh! Wolfram|Alpha doesn't run without JavaScript.

Please enable JavaScript. If you don't know how, you can find instructionshere.Once you've done that, refresh this page to start using Wolfram|Alpha.