Moved example to readme

Deleted example R script