added README.md and example R script