Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2010

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

Search the Archive

Exporting to PDF in full (landscape) page size?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg113602] Exporting to PDF in full (landscape) page size?
  • From: AES <siegman at stanford.edu>
  • Date: Thu, 4 Nov 2010 03:59:52 -0500 (EST)

How to:

* Make one or more 2D plots (plot1, plot2, . . .), all using (or 
referenced to, or defined in, or however you want to put this) a common 
coordinate system with x values limited to between -5.5 to 5.5 and y 
values limited to between -4.25 to 4.25, understood to be inches;

* Combine these using Show[plot1, plot2, . . . ];

* Export[] the result to PDF;

and have the Exported results go into a letter-sized, landscape 
-formatted PDF file for which the Document Size (as shown by 
Illustrator) is the standard 11 X 8.5 inches, ***and the graphics 
content has __exactly__ the same scaling as it was generated at.

For example, entering

w=5.5; h=4.25;

frame = Graphics[Line[{{-w,-h},{w,-h},{w,h},{-w,h},{-w,-h}}]];

plot1 = Plot[3(1-(x-1)^2),{x,0,2},PlotRange->{{-w,w},{-h,h}}];

plot2 = Plot[3(1-(x+1)^2),{x,-2,0},PlotRange->{{-w,w},{-h,h}}];

output = Show[frame,plot1,plot2];

Export["Output.pdf",output,ImageSize->{11.0, 8.5}*72];

gives me most of what I want -- except when looked at more carefully, 
everything in the resulting output is shrunk by about 5%.  (I don't 
actually want to use the whole PDF page area, right out to the edges -- 
but I want what's on the page scaled as accurately as possible.)


  • Prev by Date: Re: Positive amd PositiveDefiniteQ
  • Next by Date: Renaming Variables Across Files
  • Previous by thread: Re: Manipulate with Matrices
  • Next by thread: Renaming Variables Across Files