Services & ResourcesWolfram ForumsMathGroup Archive

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

weird Manipulate/Animate

• To: mathgroup at smc.vnet.net
• Subject: [mg76682] weird Manipulate/Animate
• From: mire <virgiliub at yahoo.com>
• Date: Fri, 25 May 2007 06:50:40 -0400 (EDT)

does anyone know why this code works

graph = Table[Plot[Sin[x + i], {x, 0, \[Pi]}], {i, 3}];
ListAnimate[graph]

and this one doesn't

n = 3; graph = Table[0, {n}];
For[i = 1, i <= n, i++,
  graph[[i]] = Show[Plot[Sin[x + i], {x, 0, \[Pi]}]]];
ListAnimate[Evaluate[graph]]

?
 I am puzzled!

• Follow-Ups:
  • Re: weird Manipulate/Animate
    • From: "Lev Bishop" <lev.bishop@gmail.com>