Re: Animation in one frame?

*To*: mathgroup at smc.vnet.net*Subject*: [mg33021] Re: Animation in one frame?*From*: adam.smith at hillsdale.edu (Adam Smith)*Date*: Tue, 26 Feb 2002 04:35:05 -0500 (EST)*References*: <a5clre$9iv$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

As far as I know there is no way of doing exactly what you want. In order to make a movie, Mathematica needs to create a series of plots much like the frames on a film. You can however have the cells automatically "collapse" into one visible cell by using the following: Do[Plot[Sin[2 Pi f t], {t, 0, 1}], {f, 1, 3}]; SelectionMove[EvaluationNotebook[], All, GeneratedCell]; FrontEndTokenExecute["CellGroup"]; FrontEndTokenExecute["OpenCloseGroup"]; Make sure that the commands are all executed in the same cell. In my example I used a Do loop, but MoviePlot works the same. MoviePlot[Sin[2 Pi f t], {t, 0, 1}, {f, 1, 3}]; SelectionMove[EvaluationNotebook[], All, GeneratedCell]; FrontEndTokenExecute["CellGroup"]; FrontEndTokenExecute["OpenCloseGroup"]; Adam Smith "William Hill" <mocitida at hotmail.com> wrote in message news:<a5clre$9iv$1 at smc.vnet.net>... > Hey there ... > Is there some option to have MoviePlot ( or whichever function is > appropriate ) animate a plot of f(x,t) in one cell only? That is, to display > the first plot, erase it, display the next, and so on, instead of having a > long sequence of cells being generated. > Thanx In Advance ... > William