Search code examples
wolfram-mathematicaopacityeps

Opacity in EPS figures

When saving graphics in Mathematica, is it possible to save figures with opacity in EPS format? For example,

Plot[Evaluate[Table[BesselJ[n, x], {n, 4}]], {x, 0, 10}, 
 Filling -> Axis]

gives the following figure which saves neatly in any format other than EPS.

Transparency in Mma

If I try saving to EPS (in Mathematica 7), the result looks like

EPS from Mma7

In Mathematica 8 it looks like

EPS from Mma8

Does anyone know how to get opacity in EPS plots (or if that is even possible)? The 'use rasterization for transparency' option doesn't look as impressive as a true EPS on zooming.

Solution

  • I usually Rasterize my graphics in this situation. Try

    Rasterize[Plot[Evaluate[Table[BesselJ[n, x], {n, 4}]],
  {x, 0, 10}, Filling -> Axis], RasterSize -> 600, ImageSize -> 400]

    Of course, the result will not be scalable and can take up more memory. You can partially solve the scalability problem by setting the RasterSize larger than the ImageSize, as I have done here.