My example dataframe:
sample1 <- seq(100,157, length.out = 50) sample2 <- seq(113, 167, length.out = 50) sample3 <- seq(95,160, length.out = 50) sam