Re: Manipulate / Space Phasor
- To: mathgroup at smc.vnet.net
- Subject: [mg92313] Re: [mg92291] Manipulate / Space Phasor
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Sat, 27 Sep 2008 22:18:48 -0400 (EDT)
- Reply-to: hanlonr at cox.net
Manipulate[Show[ParametricPlot3D[ {Sin[u], Cos[u], u/10}, {u, 0, t}, PlotRange -> {{-1, 1}, {-1, 1}, {0, 2}}, PlotStyle -> Directive[Red, Thick]], Graphics3D[{Directive[Blue, Thick], Line[{{0, 0, 0}, {Sin[t], Cos[t], t/10}}]}]], {t, 1, 20}] Bob Hanlon ---- Fabian <fabian.uriarte at gmail.com> wrote: ============= Dear Group- In this plot: Manipulate[ ParametricPlot3D[{Sin[u], Cos[u], u/10}, {u, 0, t}], {t, 1, 20}] Is there a way a to show an Arrow from the origin to the tip of the curve at all instances of time t? Thank you. -- Bob Hanlon