script for creating tidy data set, v 04