Code for creating tidy data set