Add R script