1
$\begingroup$

This question already has an answer here:

I have the following animated parametric curve where the gap looks like it's rotating in the counterclockwise direction.

Animate[ParametricPlot[{Cos[t], Sin[t]}, {t, a, a + 2 Pi - Pi/8}, 
Axes -> False, PlotStyle -> {Thick, Purple}], {a, 0, 10}]

enter image description here

I'd like to add an arrow to the endpoint so that is appears to point in the direction of rotation. Is there a simple way to do this?

$\endgroup$

marked as duplicate by m_goldberg, bbgodfrey, MarcoB, Bob Hanlon, C. E. May 30 '15 at 20:01

This question has been asked before and already has an answer. If those answers do not fully address your question, please ask a new question.

2
$\begingroup$
Animate[ParametricPlot[{Cos[t], Sin[t]}, {t, a, a + 2 Pi - Pi/8}, 
Axes -> False, PlotStyle -> {Thick, Purple}] /. Line -> Arrow, {a,0,10}]

enter image description here

$\endgroup$

Not the answer you're looking for? Browse other questions tagged or ask your own question.