MathGroup Archive 1995

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

Search the Archive

Re: Producing eps files


"LAUER Marie-Reine 154851" <LAUER at DTP.cea.fr> wrote:
>
>I would like to save graphics drawn in a Notebook as encapsulated
>postscript files. I used to do that on a Macintosh with:
> -copy the graphics
> -convert clipboard in the Edit menu
> -save in file
>I was very disapointed to see that "convert clipboard" is missing in the
>Windows version of Mma? Can anybody suggest me a way to perform this
>operation?
>Thanks.
>
>Marie-Reine LAUER


Hi.

Perhaps you might find this hack useful:


Unprotect[PSPrint]
Clear[PSPrint]
PSPrint[System`Private`x_,myfile_] := 
  (Display["!psfix >"<>myfile<>".ps", System`Private`x]; System`Private`x)
PSPrint::usage="PSPrint[ -Graphics Object-, filename] sends -Graphics Object-
to
the postscript file: filename.ps"


For example, 

In[1] = Plot[ Sin[x], {x,0,Pi}]

Out[1]:= -Graphics-

In[2] = PSPrint[ Out[1], "sine"]

(generates an encapsulated postscript file, "sine.ps")


Cheers!

-Brian Albright
http://bohm.physics.ucla.edu/~albright



  • Prev by Date: Re: Plotting a curve in space
  • Next by Date: Timing results
  • Previous by thread: Producing eps files
  • Next by thread: Re: Producing eps files