Tidy Data compiled in R script