Arrows for the axes

Question

How to get arrows for the axes when using the command Plot in Mathematica?

Thanks for any helpful answers.

Answer 1

For 2D plots such as generated by Plot the following works great:

Plot[Sin[x], {x, 0, 10}, AxesStyle -> Arrowheads[0.07]]

or with custom arrow heads:

h = Graphics[Line[{{-1, 1/2}, {0, 0}, {-1, -1/2}}]];
Plot[Sin[x], {x, 0, 10}, 
 AxesStyle -> Arrowheads[{{Automatic, Automatic, h}}]]