Services & ResourcesWolfram ForumsMathGroup Archive

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

Mathematica Animation Drives Me Crazy!

• To: mathgroup at smc.vnet.net
• Subject: [mg95604] Mathematica Animation Drives Me Crazy!
• From: "David Park" <djmpark at comcast.net>
• Date: Thu, 22 Jan 2009 07:03:27 -0500 (EST)

I have never ending problems with Mathematica animation since Version 6.
This takes the forms:

1) Sometimes (maybe about 10% if the time) an animation will 'stick' without
finishing or repeating.

2) It does not seem possible to control the actual number of points or
evaluations in the animation.

3) The documentation for the control of timing and precise steps is quite
poor and this may be a reflection of actual buggy animation routines.

 

Here is an example using Trigger, which is a kind of once-through animation.
I am using an integer range, 0 to 10 in steps of 1. I would therefore like
to have exactly 11 evaluations. But I always get an extra evaluation at the
end, and even worse I often obtain repeat evaluations for some intermediate
value. The following displays the value of n, the number of evaluations, and
the actual list of n values for the evaluations.

 

Module[{n = 0, nevals = 0, nlist = {}, calcnevals},

 calcnevals[] := 

  If[n == 0, nevals = 1; nlist = {n}, nevals = nevals + 1; 

   nlist = Append[nlist, n]];

 {Trigger[Dynamic[n, (n = #; calcnevals[]) &], {0, 10, 1}],

  Dynamic[n], Dynamic[nevals], Dynamic[nlist]}

 ]

 

The following uses DisplayAllSteps -> True but seems to have the same
problem.

 

Module[{n = 0, nevals = 0, nlist = {}, calcnevals},

 calcnevals[] := 

  If[n == 0, nevals = 1; nlist = {n}, nevals = nevals + 1; 

   nlist = Append[nlist, n]];

 {Trigger[Dynamic[n, (n = #; calcnevals[]) &], {0, 10, 1}, 

   DisplayAllSteps -> True],

  Dynamic[n], Dynamic[nevals], Dynamic[nlist]}

 ]

 

Do other users see these kind of problems, especially repeat evaluations for
some values of n?

 

David Park

djmpark at comcast.net

 <http://home.comcast.net/~djmpark> http://home.comcast.net/~djmpark/  

 

• Follow-Ups:
  • Re: Mathematica Animation Drives Me Crazy!
    • From: peter <plindsay.0@gmail.com>