Re: Notebook output write to a different file

*To*: mathgroup at smc.vnet.net*Subject*: [mg52002] Re: Notebook output write to a different file*From*: sean_incali at yahoo.com (sean kim)*Date*: Sun, 7 Nov 2004 01:03:17 -0500 (EST)*References*: <cmfapp$76o$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

<< Graphics`Graphics` notebookwritequestionanswer = NotebookCreate[]; NotebookWrite[notebookwritequestionanswer, Cell[BoxData[ToBoxes[{"Plot[x], did you ask?" }]], "Output"]]; g = DisplayTogether[ Table[Plot[Sin[x] + Random[], {x, 0, 2Pi}, PlotStyle -> GrayLevel[0.8]], {5}], DisplayFunction -> Identity]; NotebookWrite[notebookwritequestionanswer, Cell[GraphicsData["PostScript", DisplayString[g] , "Graphics"]]]; does what you want Namrata Khemka <namrata.khemka at gmail.com> wrote in message news:<cmfapp$76o$1 at smc.vnet.net>... > Hi Everyone, > I in fact have another question. I have a gui (using guikit) that > opens up NotebookA and does all the evaluation in it (graphics, mainly > graphics). However I would like write each of the output cells to a > different notebook, for example notebookB. > > Is this possible? > > Thanks a lot once again, > Namrata