Create R script.R