Create R script