update rscript for sud