Expanding the .md file and revising the R code.