rscripts modified