MathGroup Archive 1998

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

Search the Archive

Re: Making multiple plots



L. Sartre wrote:
> 
> I would like to show two plots on a same graphics output but separatly.
> For this, I do as follows:
> 
> curve1 := Plot[Sin[t x], {x, -Pi, Pi}, PlotRange -> {-Pi,Pi}, {-1, 1}}];
>  curve2 := Plot[Cos[t x], {x, -Pi, Pi}, PlotRange -> {-Pi,Pi}, {-1,
> 1}}];
> curve:=Graphics[{Rectangle[Scaled[{0,0}],Scaled[{0.5,1}],courbe1],Rectangle[
> Scaled[{0.5,0}],Scaled[{1,1}],courbe2]}]; Show[Graphics[courbe]]
> 
> Then I get three plots. I am interested in getting only the third one.
> Does anyone has any suggestion ?
> 
> Thank you in advance.


In the graphics you don't want displayed, add an option 
DisplayFunction->Identity

In the graphics you do want displayed, such as the combined graphic, add
the option
DisplayFunction->$DisplayFunction
-- 
Remove the _nospam_ in the return address to respond.



  • Prev by Date: Re: Customizing Mathematica - keyboard
  • Next by Date: Re: Eigenvectors
  • Prev by thread: Making multiple plots
  • Next by thread: Re: Making multiple plots