Added README.md and made few changes in R script