My R script that creates the tidy dataset