Animations in Graphs
- To: mathgroup at smc.vnet.net
- Subject: [mg128294] Animations in Graphs
- From: psudharaka at gmail.com
- Date: Fri, 5 Oct 2012 02:50:07 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
Hi everyone,
I produced the following graph but it wont animate.
MyR = Table[r, {r, 0, 1, .1}];
u[\[Theta]_] = 1/(2*Pi)*((1 - r^2)/(1 - 2*r*Cos[\[Theta]] + r^2));
Plot[u[MyR, \[Theta]], {\[Theta], -Pi/2, Pi/2},
PlotRange -> {0, 3.25}, PlotStyle -> {Red}, AspectRatio -> 2/3]
This following code doesn't produce any errors or Mathematica complaining but nothing happens when I hit play.
Animate[Plot[u[\[Theta]], {\[Theta], -Pi/2, Pi/2}, PlotRange -> {0, 3.25}, GridLines -> Automatic, Frame -> True, PlotStyle -> {Thick, Red}], {r, 0, 1, 0.1}, AnimationRunning -> False]
Thank you and your help is much appreciated.
- Follow-Ups:
- Re: Animations in Graphs
- From: Bob Hanlon <hanlonr357@gmail.com>
- Re: Animations in Graphs