Integrate[(-G M m/r^2),{r,Infinity,R}]