Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Re: Export a graphical plot to pdf file

• To: mathgroup at smc.vnet.net
• Subject: [mg128641] Re: Export a graphical plot to pdf file
• From: Szymon Roziewski <szymon.roziewski at gmail.com>
• Date: Tue, 13 Nov 2012 00:02:38 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-newout@smc.vnet.net
• Delivered-to: mathgroup-newsend@smc.vnet.net
• References: <k7ct90$dqe$1@smc.vnet.net> <20121110070832.BFD456962@smc.vnet.net>

Thank you all for your help.

This solution works almost well

antialias[g_] :=
 ImageResize[
  Rasterize[g, "Image", ImageResolution -> 600, Background -> White],
  Scaled[2]]

g = ContourPlot[x^2 + y^2, {x, -1, 1}, {y, -1, 1}];
img = antialias[Show[g, Axes -> False, Boxed -> False]];
Export["file.pdf", img, "AllowRasterization" -> False]

I mean the problem is with its background that is light red but it should
be white.

Best wishes,
Szymon Roziewski

On 12 November 2012 12:06, Szymon Roziewski <szymon.roziewski at gmail.com>wrote:

> Thank you all for your help.
>
> This solution works almost well
>
> antialias[g_] :=
>  ImageResize[
>   Rasterize[g, "Image", ImageResolution -> 600, Background -> White],
>   Scaled[2]]
>
> g = ContourPlot[x^2 + y^2, {x, -1, 1}, {y, -1, 1}];
> img = antialias[Show[g, Axes -> False, Boxed -> False]];
> Export["file.pdf", img, "AllowRasterization" -> False]
>
> I mean the problem is with its background that is light red but it should
> be white.
>
> Best wishes,
> Szymon Roziewski
>



-- 
Z wyrazami szacunku,
Szymon Roziewski

• References:
  • Re: Export a graphical plot to pdf file
    • From: RBaillie <bobbaillie@frii.com>