committing new R code