Correcting the script and getting a new tidy data set