MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

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


yy = y /. First@NDSolve[{y'[t] == -y[t], y[0] == 1}, {y}, {t, 0, 7}];
DisplayTogether[{Plot[yy@t, {t, 0, 7}],
   Graphics at {PointSize[.015], Table[Point@{t, yy@t}, {t, 0, 7, .2}]}}]

Bobby

On Wed, 27 Oct 2004 01:54:41 -0400 (EDT), sean kim <sean_incali at yahoo.com> 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
>
>
>
>



-- 
DrBob at bigfoot.com
www.eclecticdreams.net


  • Prev by Date: Re: Creating a Moving Average Function
  • Next by Date: Re: listplot and plot of the same function display in different scale...
  • Previous by thread: listplot and plot of the same function display in different scale...
  • Next by thread: Re: listplot and plot of the same function display in different scale...