Re: listplot and plot of the same function display in different scale...

*To*: mathgroup at smc.vnet.net*Subject*: [mg51709] Re: [mg51617] listplot and plot of the same function display in different scale...*From*: "Maxim A. Dubinnyi" <maxim at nmr.ru>*Date*: Sun, 31 Oct 2004 01:15:12 -0500 (EST)*References*: <200410270554.BAA24581@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

See changes in Table inside ListPlot 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[{t, Evaluate[ y[t] /. solution\[LeftDoubleBracket]1, 1\[RightDoubleBracket]]}, {t, 0, 7, 0.05}], PlotStyle -> PointSize[0.015], DisplayFunction -> Identity]; Show[g0, g1, DisplayFunction -> $DisplayFunction] That's all. sean kim wrote: >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 > >

**References**:**listplot and plot of the same function display in different scale...***From:*sean kim <sean_incali@yahoo.com>