Re: Show graphics command
- To: mathgroup at smc.vnet.net
- Subject: [mg40358] Re: Show graphics command
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Thu, 3 Apr 2003 01:40:20 -0500 (EST)
- Organization: Universitaet Leipzig
- References: <b6e7n3$85n$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
Plot[f[x],{x,0,Xo}, Epilog->(Point /@ data)]
or
Block[{$DisplayFunction=Identity},
g1=ListPlot[data];
g2=Plot[f[x],{x,0,Xo}];
]
Show[g1,g2]
or
Show[
ListPlot[data,DisplayFunction->Identity],
Plot[f[x],{x,0,Xo},DisplayFunction->Identity],
DisplayFunction->$DisplayFunction
]
or
Needs["Graphics`Graphics`"]
DisplayTogether[
ListPlot[data],Plot[f[x],{x,0,Xo}]
]
Regards
Jens
Nathan Moore wrote:
>
> The list operations have been very useful.
>
> Here's a pet peeve. Often when I combine several graphics objects with
> the show command I get a bunch of extraneous plots. Suppose I have a list
> of {x,y} pairs (named "data") and a fit function f[x] and I want to show
> them together. The easiest way to do this is with the command,
>
> Show[ListPlot[data],Plot[f[x],{x,0,Xo}]
>
> When I execute this I get 3 plots, ListPlot[data], the Plot[f[x]], and
> then the tro combined. How can I have the front end suppress the first
> two plots? (this "error" is especially annoying when I'm plotting 7 or 8
> lists together)
>
> Nathan Moore