First commit of R code