1 Added ReadMe.md
2 Revised the comments in the R script