H$\vphantom{a}$i. Consider the following code:
f1 = Plot3D[-Exp[-x^2-y^2],{x,-5,5},{y,-5,5},PlotRange->All]
f2 = Graphics3D[Table[{Arrowheads[.01],Arrow[{{2Cos[i],2Sin[i],0},{2.5Cos[i], 2.5Sin[i],0}}]},{i,0,2Pi,2Pi/40}]]
So far so good. Let us now combine these figures into a single figure:
Show[f1, f2]
For some reason, some arrows look funny: their heads are much larger than they should be. The behaviour is even weirder if we rotate the figure
What's going on here? how can I fix this?
Thanks.