rscript begin