Re: listplot and plot of the same function display in different scale...
- To: mathgroup at smc.vnet.net
- Subject: [mg51630] Re: listplot and plot of the same function display in different scale...
- From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
- Date: Wed, 27 Oct 2004 23:42:23 -0400 (EDT)
- Organization: Uni Leipzig
- References: <clneqo$ocd$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
solution = NDSolve[{y'[t] == -y[t], y[0] == 1}, {y},
{t, 0, 7}];
g0 = Plot[Evaluate[y[t] /. solution], {t, 0, 7},
DisplayFunction -> Identity];
g1 = ListPlot[Table[Evaluate[{t, y[t]} /. solution[[1]]],
{t, 0, 7, 0.05}], PlotStyle -> PointSize[0.015],
DisplayFunction -> Identity];
Show[g0, g1, DisplayFunction -> $DisplayFunction]
Regards
Jens
"sean kim" <sean_incali at yahoo.com> schrieb im Newsbeitrag
news:clneqo$ocd$1 at smc.vnet.net...
> Hello group,
>
> let's say you want to take a few points from an
> interploating function and ListPlot it. and then show
> it together with the graph object from Plot.
>
> so...
>
> solution = NDSolve[{y'[t] == -y[t], y[0] == 1}, {y},
> {t, 0, 7}];
>
> g0 = Plot[Evaluate[y[t] /. solution], {t, 0, 7},
> DisplayFunction -> Identity];
> g1 = ListPlot[Flatten[Table[Evaluate[y[t]/.solution],
> {t, 0, 7, 0.05}]],PlotStyle -> PointSize[0.015],
> DisplayFunction -> Identity];
>
> Show[g0, g1, DisplayFunction -> $DisplayFunction]
>
> will show two plots in one graph, but plots have their
> own axis scale. the Plot[] object seems to be shrunk
> in scales due to ListPlot[] object having more points.
> (due to being tabled)
>
> How do i fix this so that both Plot have same axis
> scales? ( I want to show dots from ListPlot to overlay
> on top of Plot graph. )
>
> Thanks in advance for any insights.
>
>
> sean
>
>
>
> __________________________________
> Do you Yahoo!?
> Yahoo! Mail Address AutoComplete - You start. We finish.
> http://promotions.yahoo.com/new_mail
>