Tidy Data Examples - Data Setup Copy and paste the following code segments into your working environment. DF1 <- data.frame(ID = rep(c("Oscar","Charlie"),10),A1 = rnorm(20,10,2))