Update README.md

Added explanation of my R script