PolarPlot[(1 %2B 0.9 Cos[8 t]) (1 %2B 0.1 Cos[24 t]) (0.9 %2B 0.05 Cos[200 t]) (1 %2B Sin[t])%2C %7Bt%2C -Pi%2C Pi%7D