remove the original R script
new R script added