RE: RE: Animate
- To: mathgroup at smc.vnet.net
- Subject: [mg67041] RE: [mg66997] RE: [mg66956] Animate
- From: "King, Peter R" <peter.king at imperial.ac.uk>
- Date: Thu, 8 Jun 2006 04:52:53 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
This great - it has just help me create an animation of a dispersing pulse. Is htere any way to export the resulting animation to an avi file (or any similar movie file)? Thanks, Peter > -----Original Message----- > From: David Park [mailto:djmp at earthlink.net] To: mathgroup at smc.vnet.net > Subject: [mg67041] [mg66997] RE: [mg66956] Animate > > > You have to select the group of 6 graphics cells, close them > up, and then > double click on the image to start the animation. Or just > double click on > any image without closing them up. > > Alternatively, you could attach the following lines of code, > which will > automatically do this for you. > > Needs["Graphics`Animation`"] > > Module[{n}, Animate[Plot[Sin[n x], {x, 0, 2 Pi}], {n, 1, 6, 1}]] > SelectionMove[EvaluationNotebook[], All, GeneratedCell] > FrontEndTokenExecute["OpenCloseGroup"]; Pause[0.5]; > FrontEndExecute[{FrontEnd`SelectionAnimate[200, > AnimationDisplayTime -> 0.1, > AnimationDirection -> Forward]}] > > The 'A' button from the DrawGraphics palette that comes with the > DrawGraphics package, for those who have it, will paste in > those lines of > code. > > Also, don't forget that you can control the animation with > keyboard keys. > 1) up/down arrows will advance one frame at a time. > 2) left/right arrows will start animation in forward or > reverse direction. > 3) 'p' will pause or restart the animation. > 4) 'c' will put the animation in the ForwardBackward mode. > 5) The number keys will control the speed of the animation. > > David Park > djmp at earthlink.net > http://home.earthlink.net/~djmp/ > > > > > From: MR [mailto:marcinrak at gmail.com] To: mathgroup at smc.vnet.net > > Hey everyone > > Module[{n}, Animate[Plot[Sin[n x], {x, 0, 2 Pi}], {n, 1, 6, 1}]]; > > running the above command doesn't yield an animation in one plot, but > much rather six different still plots which appear one beneath the > other. > > Any ideas? > > >