data(survey, package = "MASS")
columns <- c("Sex", "Age", "Smoke")
index <- design(pheno = survey[, columns], size_subset = 70,
iterations = 10)
batches <- inspect(index, survey[, columns])
head(batches)
Run the code above in your browser using DataLab