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