When arrowheads are added to the axes, the ends of the ticks are covered by the arrowheads, e.g., ticks for $1$ disappear in the plot below,
Plot[x^2, {x, 0, 1}, AxesStyle -> Arrowheads[{0.03}]]
I would like to extend axis length a little bit to avoid the problem. How can that be achieved?