PolarPlot[{2 Sin[3 x], 1 + Cos^2[3 x]^2}, {x, 0, 2 [Pi]}]
the two equations i wanted were r= 2Sin(3x) and r= 1+Cos^2(3x)
You probably need the following syntax. I assumed you wanted cos^2((3x)^2))
cos^2((3x)^2))
PolarPlot[{2 Sin[3 x], 1 + Cos[(3 x)^2]^2(*cos^2 must be (Cos[])^2*)}, {x, 0, 2 Pi(*without the [] around Pi*)}]