adding raw data, tidy data, and R code