MathGroup Archive 2005

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

Search the Archive

Re: Re: Mathematica graphs in WORD

  • To: mathgroup at smc.vnet.net
  • Subject: [mg55998] Re: [mg55959] Re: Mathematica graphs in WORD
  • From: "Janos D. Pinter" <jdpinter at hfx.eastlink.ca>
  • Date: Wed, 13 Apr 2005 01:10:30 -0400 (EDT)
  • References: <861FFFB4A9FE3A449EBE4C6EB799820406B6A0@fs1.hillsdale.edu>
  • Sender: owner-wri-mathgroup at wolfram.com

>Prof. Adam Smith
>Dept. of Physics
>Hillsdale College
>
>517-607-2436  Office
>517-607-2252  Fax
>517-437-7341  Switchboard
>
>adam.smith at hillsdale.edu
>

Adam,

thanks very much for the detailed explanation. Now it works exactly as 
described.

Regards,
Janos
_________________________________________________

Janos D. Pinter, PhD, DSc
President & Research Scientist, PCS Inc.
129 Glenforest Drive, Halifax, NS, Canada B3M 1J2
Telephone: +1-(902)-443-5910
Fax: +1-(902)-431-5100; +1-(902)-443-5910
E-mail: jdpinter at hfx.eastlink.ca
Web: www.pinterconsulting.com
Software products: www.pinterconsulting.com/Software_Sum_Info.pdf



At 10:20 AM 4/12/2005, Adam Smith wrote:

>I am sorry, I left the instructions on how to insert the file into WORD.
>
>In Mathematica do the steps outlined in my posting:
>
>sinplot = Plot[Sin[x], {x, -2 Pi, 2 Pi}]
>
>Export["C:\Graphs\sinplot.eps", sinplot, "EPSTIFF", ImageResolution ->100]
>
>Note:  If you leave off the explicit directory as shown below.
>
>Export["sinplot.eps", sinplot, "EPSTIFF", ImageResolution ->100]
>
>Mathematica writes the file to the default directory.  This can be found 
>by typing Directory[] in Mathematic.  On my machine it is "C:\Program 
>Files\Wolfram Research\Mathematica\4.1"
>
>Now go to the WORD document:
>
>1.  Position the cursor at the point where you want to insert the graph.
>2.  On the menu bar at the top:  Click on "Insert" -> "Picture" -> "From File"
>3.  In the window that pops up, navigate to the directory where the file 
>is stored.  In my example the "Graphs" directory on the C-drive (hence the 
>"C:\Graphs\" in Mathematica's Export command).
>4.  Select the filename (sinplot.eps for my example)
>
>This should insert the graph into the WORD document.
>
>Hope that helps.
>
>Prof. Adam Smith
>Dept. of Physics
>Hillsdale College
>
>517-607-2436  Office
>517-607-2252  Fax
>517-437-7341  Switchboard
>
>adam.smith at hillsdale.edu
>
>
>
>
>
>-----Original Message-----
>From: Janos D. Pinter [mailto:jdpinter at hfx.eastlink.ca]
To: mathgroup at smc.vnet.net
>Sent: Tuesday, April 12, 2005 7:40 AM
>Cc: mathgroup at smc.vnet.net
>Subject: [mg55998] Re: [mg55959] Re: Mathematica graphs in WORD
>
>
>
>
>Adam,
>
>I just tried your suggestion on a Windows XP machine with Office 2000, and
>instead of the graphics image the eps code is pasted in... Please advise.
>
>Thanks,
>Janos
>_________________________________________________
>
>Janos D. Pinter, PhD, DSc
>PCS Inc.
>E-mail: jdpinter at hfx.eastlink.ca
>Web: www.pinterconsulting.com
>
>
>
>
>At 06:26 AM 4/12/2005, you wrote:
>
> >I have found that the best looking results are when you export the
> >Mathematica output to a postscript file - a sample code is shown below.
> >  Then go into WORD and import the graph as a file.
> >
> >I will admit that this is not the most convenient.  I would love to
> >have a simple "Cut/Paste as postscript" solution.  But I work in the
> >Windows environment and have tried the various Cut/Paste options
> >available and have always found that they have some jaggedness to them.
> >  The postscript file route also has the advantage that you can resize
> >the graph inside WORD without any loss of resolution.
> >
> >Here is my code to export the postscript file.  See Export in the
> >Mathematica Help for details.
> >
> >
> >sinplot = Plot[Sin[x], {x, -2 Pi, 2 Pi}]
> >
> >Export["C:\Graphs\sinplot.eps", sinplot, "EPSTIFF", ImageResolution ->
> >100]
> >
> >I use the ESPTIFF option because it produces a reduced resolution
> >preview that provides a view inside WORD.  The default resolution in
> >Mathematica produces a somewhat jagged preview within WORD although it
> >prints nicely.  I personally want a smoother on screen preview and have
> >found that the ImageResolution -> 100 produces a nice on screen view
> >with a minimum increase in the file size.  I have not tried this under
> >OSX so you might need to modify the directory syntax - I am writing the
> >file to a "Graphs" folder on the main C drive.
> >
> >Adam Smith
> >
> >
> >
> >tsokos at acs.gr wrote:
> > > I have a very elementary question to
> > > which I would appreciate help from
> > > someone. I use Mathematica 5.0 for the
> > > Macintosh (OSX). How do you copy a graph
> > > from Mathematica into a WORD document so
> > > that when you print it the graph is
> > > smooth rather jagged?
> >
> >
> >
> >--
> >No virus found in this incoming message.
> >Checked by AVG Anti-Virus.
> >Version: 7.0.308 / Virus Database: 266.9.6 - Release Date: 4/11/2005
>
>
>--
>No virus found in this outgoing message.
>Checked by AVG Anti-Virus.
>Version: 7.0.308 / Virus Database: 266.9.7 - Release Date: 4/12/2005
>
>
>
>
>--
>No virus found in this incoming message.
>Checked by AVG Anti-Virus.
>Version: 7.0.308 / Virus Database: 266.9.7 - Release Date: 4/12/2005


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.7 - Release Date: 4/12/2005


  • Prev by Date: Re: Effect of Simplify on numeric vs symbolic
  • Next by Date: Re: Mathlink
  • Previous by thread: Re: Mathematica graphs in WORD
  • Next by thread: Re: Mathematica graphs in WORD