Add R Script
Revert "Update README.md"

This reverts commit 2282ec91b70e6f4e3092d6a7b0a1f80f033fb2e2.