This really should not be hard:
StreamPlot[{1, 1}, {x, 0, 1}, {y, 0, 1}, StreamStyle -> {Arrowheads[.02], Darker[Pink]}] But this is the mess Mathematica turns this into:
The distribution is quasi-random, and there seem to be a number of wrong arrowheads thrown in randomly, too. I would classify this as a bug (or several of them). Are there decent work-arounds? I found that providing sets of StreamPoints also does not work as expected:
StreamPlot[{1, 1}, {x, 0, 1}, {y, 0, 1}, StreamStyle -> {Arrowheads[.02], Darker[Pink]}, StreamPoints -> {{{0.01, 0}, {0.01, 0.1}, {0.01, 0.2}, {0.01, 0.3}, {0.01, 0.4}}}] We still get incorrect arrows, and the streamlines inexplicably stop after a short distance.


StreamColorFunction -> None, StreamStyle -> {Automatic, Darker[Pink]}$\endgroup${1 + 0.005 Cos[100 x y], 1 + 0.005 Sin[100 x y]}. Adding lots of points helps a bit, too:StreamPlot[{1, 1}, {x, 0, 1}, {y, 0, 1}, StreamPoints -> {MeshCoordinates@DiscretizeRegion[Rectangle[], MaxCellMeasure -> 0.001]}, StreamColorFunction -> None, StreamStyle -> {Arrowheads[.02], Darker[Pink]}]$\endgroup$