MathGroup Archive 2006

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

Search the Archive

Re: "particle" sliding along a curve


Hi

Check the help at
Graphics`Animation`

The example below gives you an idea.

In[56]:=
\!\(f[x_] := x\^2\)

In[95]:=
frame[xp_]:=Plot[f[x],{x,-10,10},
    Epilog\[Rule]{Disk[{xp,f[xp]},{1,10}]}]

In[88]:=
<<Graphics`Animation`

In[98]:=
Animate[frame[xp],{xp,-5,0,0.5}]

Bye
Ben

Mattiephly at hotmail.com schrieb:

> Hi there.  I'd like to create a Mathematica plot that displays a
> "particle" -- which will just be a small, black circle -- "sliding"
> along a curve.  That is, when I execute the Plot command, I'd like to
> watch as the particle moves along the curve from one point to another.
> I've looked at the help documents for the built in Animation abilities,
> but I'm not sure how to make use of them.  Do I really have to create a
> single plot for several positions of the particle, and then animate
> those consecutively?
>
> For example, I'd like my particle to slide along the parabola y = x^2,
> and I'd like the particle to "slide" from x = -5 to 5 (though maybe
> show the curve from x = -10 to 10).  And I'd like to be able to control
> the "speed" of the particle, too.
> 
> I appreciate any thoughts on this.
> 
> Thanks a lot,
> R


  • Prev by Date: RE: "particle" sliding along a curve
  • Next by Date: Re: Unable to print notebook
  • Previous by thread: RE: "particle" sliding along a curve
  • Next by thread: Re: "particle" sliding along a curve