commit R script