R range fix