Finished off the R code for Section 5