solution to the course project for Getting and Cleaning Data in R