Re: "particle" sliding along a curve
- To: mathgroup at smc.vnet.net
- Subject: [mg70551] Re: "particle" sliding along a curve
- From: "ben" <benjamin.friedrich at gmail.com>
- Date: Thu, 19 Oct 2006 03:22:46 -0400 (EDT)
- References: <eh4pd9$8j8$1@smc.vnet.net>
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