How To Calculate Range In R