Add finished R script