PolarPlot (Sin[t] Sqrt[Abs[Cos[t]]])/(Sin[t] + 7/5) - 2 Sin[t] + 2