adding R script file