How to draw a 3D point moving along a helical path?

You can add a moving point using a combination of options MeshFunctions, Mesh, and Method as follows:

Animate[ParametricPlot3D[{Cos[t], Sin[t], t/4}, {t, 0, u},
      ImageSize -> Small, 
      MeshFunctions -> {#4 &}, 
      Mesh -> {{u}}, 
      MeshStyle -> Red, 
      Method -> {"BoundaryOffset" -> False}, 
      PlotRange -> {{-2, 2}, {-2, 2}, {0, 8}}] /. Point -> (Sphere[#, .15] &), 
   {u, 10^-6, 30}, AnimationRate -> 3]

enter image description here \

Note: Used ReplaceAll to change the Point primitive to Sphere.

Tags:

Plotting

Graphics3D

Parametric Functions

Related