Add Rscript