在 Mathematica 中保存图形时,是否可以以 EPS 格式保存不透明的图形?例如,

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

给出了下图,它以 EPS 以外的任何格式整齐地保存。

如果我尝试保存到 EPS(在 Mathematica 7 中),结果看起来像

在 Mathematica 8 中,它看起来像

有谁知道如何在 EPS 图中获得不透明度(或者甚至可能)? “使用光栅化透明度”选项在缩放时看起来不像真正的 EPS 那样令人印象深刻。

最佳答案

在这种情况下,我通常会光栅化我的图形。尝试

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

当然,结果不会是可扩展的,会占用更多的内存。您可以通过将 RasterSize 设置为大于 ImageSize 来部分解决可伸缩性问题,就像我在这里所做的那样。

关于wolfram-mathematica - EPS 数字的不透明度,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/5415459/

10-13 06:08