# Is it possible to color in parts of a parametric plot [duplicate]

I use this code to plot a parametric plot.

ParametricPlot[{2 Sin[t + 3/2 π] + 4/3*Cos[3 t],
2 Cos[t + 3/2 π] + 4/3*Sin[3 t]}, {t, -2 π, 2 π},
PlotLabel -> "Proximus Symbool"]


Now I tried different ways of plotting it and coloring it however none of them work so far. So What i actually wanna achieve is this kind of picture:

With this i could explain that you need to calculate the surface between $$+\frac{5\cdot \sqrt{2}}{3}$$ and $$-\frac{5\cdot \sqrt{2}}{3}$$

You can use FilledCurve to color in the line. The simplest method to get the different colors for this example is probably to create the plot twice, with a RegionFunction to exclude the inner part for the second plot.
plot[col_, opts___] := ParametricPlot[