       # Re: How to draw several curves in different boxes ?

• To: mathgroup@smc.vnet.net
• Subject: [mg10296] Re: How to draw several curves in different boxes ?
• From: Bill Bertram <wkb@ansto.gov.au>
• Date: Mon, 5 Jan 1998 03:47:17 -0500
• Organization: ANSTO
• References: <68l3td\$mg4@smc.vnet.net>

```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 ?

Yes there is a way.

For the first two plots that you don't want to show use the option

DisplayFunction -> Identity

To show the next combined plot you must use

DisplayFunction -> \$DisplayFunction

Cheers,
Bill

```

• Prev by Date: Re: Eulerian angles
• Next by Date: Re: Convert long String to large Array
• Prev by thread: How to draw several curves in different boxes ?
• Next by thread: Re: Packages for Feynman Diagrams