Second commit with R code