Adding the R script
Updating README file
Adding CodeBook