I have a data frame which has three columns:
df <- structure(list(lowage = c(45, 15, 9, 51, 22, 45, 4, 4, 9, 25), highage = c(50, 21, 14, 60, 24, 50,