Re: listplot and plot of the same function display in different scale...
- To: mathgroup at smc.vnet.net
- Subject: [mg51638] Re: [mg51617] listplot and plot of the same function display in different scale...
- From: "David Park" <djmp at earthlink.net>
- Date: Wed, 27 Oct 2004 23:42:43 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Sean, Clear[y]; NDSolve[{Derivative[1][y][t] == -y[t], y[0] == 1}, {y}, {t, 0, 7}][[1,1]]; y[t_] = y[t] /. % g0 = Plot[y[t], {t, 0, 7}, DisplayFunction -> Identity]; g1 = ListPlot[Table[{t, y[t]}, {t, 0, 7, 0.05}], PlotStyle -> PointSize[0.015], DisplayFunction -> Identity]; Show[g0, g1, DisplayFunction -> $DisplayFunction]; David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: sean kim [mailto:sean_incali at yahoo.com] To: mathgroup 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