Weird colors in Mathematica 10.2

The answer is simple. Per default Mathematica reduces the opacity of the colors. Try the following:

ParametricPlot[{Cos[u], Sin[u]}, {u, 0, 2 Pi}] /. 
 Line[l_List] :> {{Red, Polygon[l]}, {Black, Line[l]}}

% /. _Opacity :> Opacity[1]

If you look at the InputForm of your graphics, you will notice a

FaceForm[Opacity[0.3]]

call right in the front. With this knowledge, you can simply fix it by calling:

ParametricPlot[{Cos[u], Sin[u]}, {u, 0, 2 Pi}, 
  PlotStyle -> Opacity[1]] /. 
 Line[l_List] :> {{Red, Polygon[l]}, {Black, Line[l]}}

I think using the 2nd argument of Opacity is a slightly simpler way to correct the problem than the methods given by halirutan, although those are perfectly fine.

ParametricPlot[{Cos[u], Sin[u]}, {u, 0, 2 Pi}] /. 
  Line[l_List] :> {{Opacity[1, Red], Polygon[l]}, {Black, Line[l]}}

plot

Tags:

Color

Plotting