Final commits to the R script