first commit R script
added a new readme file