(*  cartoid plots  *)

ParametricPlot({16 Sin(x)^3, 13 Cos(x)-5 Cos(2 x)-2 Cos(3 x)-Cos(4 x)},
    {x, 0, 2 Pi}
)