Create rscript.r