You can do this using DisplayFunction -> Identity to hide the component
plots, then DisplayFunction-> $DisplayFunction to put them back together.
so you can do:
Show[Plot[f[x],{x,x0,x1},DisplayFunction -> Identity],ListPlot[somedata,
DisplayFunction -> Identity],ListPlot[someotherdata, DisplayFunction ->
Identity],DisplayFunction->$DisplayFunction]
or alternatively, if the preceeding doesn't work:
Block[{graph1, graph2, graph3},
graph1 = Plot[f[x],{x,x0,x1},DisplayFunction -> Identity];
graph2 = ListPlot[somedata, DisplayFunction -> Identity];
graph3 = ListPlot[someotherdata, DisplayFunction -> Identity];
Show[graph1,graph2,graph3,DisplayFunction->$DisplayFunction]]
>When you use the Show command to display several plots together,ie
>
>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?
--------------
Luci Ellis: elisha at dot.net.au
http://www.dot.net.au/~elisha