Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2012

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

Search the Archive

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.



  • Prev by Date: Re: Get Distribution from Interpolated Function
  • Next by Date: How to plot function & integral with vector variable ?
  • Previous by thread: Re: Markers in list plot
  • Next by thread: Re: Animations in Graphs