Re: Mathematica Animation Drives Me Crazy!

*To*: mathgroup at smc.vnet.net*Subject*: [mg95706] Re: Mathematica Animation Drives Me Crazy!*From*: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>*Date*: Sun, 25 Jan 2009 06:52:47 -0500 (EST)*Organization*: The Open University, Milton Keynes, UK*References*: <15010445.1232628718537.JavaMail.root@m02> <gletl0$4tg$1@smc.vnet.net>

In article <gletl0$4tg$1 at smc.vnet.net>, "David Park" <djmpark at comcast.net> wrote: > This may be a platform dependent problem. In any case, I'm working on a > 32-bit Windows Vista, Version 7. > > Here are some typical results of repeated Trigger activation (Trigger > controls omitted) with the first form of the Trigger example: > > 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]}] > > 4,10,{0,1,1,1,2,2,2,3,3,4} > 10,23,{0,1,1,1,2,2,2,3,3,3,3,4,4,4,5,6,7,7,8,8,9,10,10} > 10,13,{0,1,2,3,4,5,6,7,8,9,9,10,10} > 10,12,{0,1,2,3,4,5,6,7,8,9,10,10} > 10,15,{0,1,1,2,3,4,5,6,7,7,8,8,9,10,10} > 1,2,{0,1} > > Notice that in the first and last case the animation 'froze' at n = 4 and n > = 1. The first number is the last value of n, the second number is the > number of values that were actually produced (it should be equal to 11) and > the third item is the list of values produced, which should be > {0,1,2,3,4,5,6,7,8,9,10}. > > I would be very thankful if users on Windows Vista could try this out. [snip] Hi David, FWIW, Mathematica 7.0 on 32-bit Windows XP Pro SP3, here is a sample of the sequences returned: 0,0,{} 10,12,{0,1,2,3,4,5,6,7,8,9,10,10} 10,12,{0,1,2,3,4,5,6,7,8,9,10,10} 10,12,{0,1,2,3,4,5,6,7,8,9,10,10} (*...*) Regards, --Jean-Marc