I have this data frame set.seed(1234) x <- rnorm(80, 5, 1) df <- data.frame(groups = c(rep("group1",20), rep("group2",20), rep("group3",20), rep("group4&...