R code for tidy data project in Getting_Cleaning_Data course