adding tidy datasets and R code