MathGroup Archive 1999

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

Search the Archive

Re: Preventing plotting on output


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").


  • Prev by Date: Re: unix font problem
  • Next by Date: Re: Mathematica programming language
  • Previous by thread: Re: Preventing plotting on output
  • Next by thread: Re: Sorting problem