R script commit