removed R script