few Rscript changes