Re: Preventing plotting on output

*To*: mathgroup at smc.vnet.net*Subject*: [mg20150] Re: Preventing plotting on output*From*: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>*Date*: Sat, 2 Oct 1999 03:05:07 -0400*Organization*: Universitaet Leipzig*References*: <7suv5r$21s@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Hi, Block[{$DisplayFunction = Identity}, graph1 = Plot[Sin[2 Pi x], {x, 0, 2}] ; graph2 = Plot[Sin[4 Pi x], {x, 0, 2}]; ] Show[{graph1, graph2}, DisplayFunction -> $DisplayFunction] does what you want. Hope that helps Jens > I want to construct some plots and then display them combined on one > graph. The Plot[] for each individual plot is fairly lengthy and I was > hoping to save some space by replacing the "DisplayFunction->Identity" > with a single word like "nodisp". In the final Show[] I would then > turn the display back on with the > usual "DisplayFunction>$DisplayFunction" (maybe even equate it with a > single term like "disp").