MathGroup Archive 2002

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

Search the Archive

Real Time Animation

  • To: mathgroup at smc.vnet.net
  • Subject: [mg36796] Real Time Animation
  • From: Goyder Dr HGD <H.Goyder at rmcs.cranfield.ac.uk>
  • Date: Thu, 26 Sep 2002 04:56:49 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

In a presentation I wish to use Plot to generate a sequence of frames and
then animate them. The problem is that the audience sees the animation
twice. Once when the frames are being generated and then again after I have
closed the group and double clicked on the top graphic. However, the first
showing during generation is enough (but uncontrolled). 

Is it possible to tidy up the generation of the graphic so that it becomes
the animation?

I have tried the following


Do[Plot[Sin[t]*Sin[x], {x, 0, Pi}, PlotRange -> {{0, Pi}, {-1, 1}},
ImageSize -> 400]; 
   SelectionMove[EvaluationNotebook[], All, GeneratedCell];
FrontEndExecute[{FrontEnd`SelectionAnimate[0.1]}]; 
   FrontEndExecute[{FrontEndToken["Clear"]}], {t, 0, 15, 0.1}]


This works but the cell dividing line flashes on and off spoiling the
animation and if there is anything in the cell below this jumps up and down.

Is there a proper way of doing this?


Hugh Goyder


  • Prev by Date: Re: Strange ReplaceAll behavior
  • Next by Date: Re: Strange ReplaceAll behavior
  • Previous by thread: The Innovation Algorithm
  • Next by thread: Re: Real Time Animation