R script files & graph