R script file and data set