Re: Animation
- To: mathgroup at smc.vnet.net
- Subject: [mg112639] Re: Animation
- From: Themis Matsoukas <tmatsoukas at me.com>
- Date: Fri, 24 Sep 2010 04:09:33 -0400 (EDT)
Use Take[place,i] to ListPlot all points up ti i:
place = {{10, 4}, {10, 7}, {10, 5}, {9, 7}};
Manipulate[
ListPlot[Take[place, i],
PlotRange -> {{1, 15}, {1, 15}},
Frame -> True, PlotStyle -> Directive[PointSize[Large]]
],
{i, 1, 4, 1}
]
Themis