Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1995
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1995

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

Search the Archive

Re: Producing eps files

  • To: mathgroup at christensen.cybernetics.net
  • Subject: [mg1935] Re: Producing eps files
  • From: Albright <albright at physics.ucla.edu>
  • Date: Wed, 23 Aug 1995 22:32:24 -0400
  • Organization: University of California, Los Angeles

"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