Re: Multiple plots
- To: mathgroup at smc.vnet.net
- Subject: [mg7315] Re: [mg7257] Multiple plots
- From: Allan Hayes <hay at haystack.demon.co.uk>
- Date: Fri, 23 May 1997 01:41:50 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Tue, 20 May 1997
seanross at worldnet.att.net
[mg7257] Multiple plots
>Show[Plot[f[x],{x,x0,x1}],ListPlot[somedata],ListPlot[someotherdata]]>It
shows each of the separate plots and then puts them all together
>at the end.
> Does anyone know how I could get it not to display any of the
> individual plots and only show the combined plot at the end?
Sean:
Two ways are
Show[
Block[{$DisplayFunction = Identity},
{Plot[Sin[x],{x,0,7}],
ListPlot[{1,2,1}],
ListPlot[{3,2,4,1}]
}
]
]
and
Show[
Plot[Sin[x],{x,0,7},DisplayFunction-> Identity],
ListPlot[{1,2,1},DisplayFunction-> Identity],
ListPlot[{3,2,4,1},DisplayFunction-> Identity],
DisplayFunction-> $DisplayFunction
]
Allan Hayes
hay at haystack.demon.co.uk
http://www.haystack.demon.co.uk/