6
$\begingroup$

I have following code

Animate[ Plot[myvariable x,{x,0,100} ], {myvariable,0.1,1},AnimationRunning->If[myvariable==1,False,True] ]

How do I make the animation stop automatically when reaching a defined value?

NOTE: I tried to make it stop by evaluating myvariable in a If expression, but I get the error "An unrecognized option name ("AnimationRunning") was encountered while reading a AnimatorBox."

Improve this question
$\endgroup$
2
  • 1
    $\begingroup$ Given your example, you could just set AnimationRunning -> True, AnimationRepetitions -> 1 $\endgroup$ Commented Jan 10, 2013 at 19:31
  • $\begingroup$ Post is an answer an I will mark as the answer, Thanx for answering so fast :D $\endgroup$ Commented Jan 10, 2013 at 19:34

2 Answers 2

Reset to default
3
$\begingroup$

The condition in your case is to stop at the maximum value of the parameter. This can be achieved by setting the number of animation repetitions to 1 (i.e., no looping):

Animate[Plot[myvariable x, {x, 0, 100}], {myvariable, 0.1, 1}, AnimationRunning -> True, AnimationRepetitions -> 1 ]
Improve this answer
$\endgroup$
7
$\begingroup$

Mathematica is very flexible when it comes to these sorts of things. You can easily build your own little animation, and add as much complexity to the logic of termination by using Dynamic directly.

For example, this plots Cos[a x] and stops the animation when a>0.2. 

Clear[p]; Dynamic[p] Do[p = Plot[Cos[a x], {x, 0, 100}, Frame -> True, FrameLabel -> {{None, None}, {x, Style[Column[{"doing my own animation !", Cos[a x]}, Alignment -> Center], 14]}}, GridLines -> Automatic]; If[a > 0.2, Break[]]; (*condition to stop*) Pause[.2], {a, 0.1, 1, .01} ]

Mathematica graphics

Improve this answer
$\endgroup$
2
  • 2
    $\begingroup$ +1 for a method I really don't think I would have considered. $\endgroup$ Commented Jan 11, 2013 at 1:11
  • 1
    $\begingroup$ +1 Because you did the work to allow a more general stopping condition than the question asked for. $\endgroup$ Commented Jan 11, 2013 at 1:34

Start asking to get answers

Find the answer to your question by asking.

Ask question

Explore related questions

See similar questions with these tags.