Adding R code to the repo