Optimise computeR a bit