Moved the R script needed for demo application from demos to contrib.