# NOT RUN {
#Data:
A <- round(runif(100,1,6))
B <- round(runif(70,1,5))
C <- round(runif(20,1,4))
linelist <- list(A, B, C)
rm(A, B, C)
bootno <- 1000
#Call:
bootdata <- gen_boot_samples_list(linelist, bootno)
# }
Run the code above in your browser using DataLab