R code and data