Altered grid on r to allow for values < 1