# NOT RUN {
data("WheatMadaToy")
phenoMada <- (phenoMada[order(phenoMada$GID),])
pheno <- data.frame(GID = phenoMada[, 1], Response = phenoMada[, 3])
CV.KFold(pheno)
CV.KFold(pheno, set_seed = 123)
CV.KFold(pheno, DataSetID = 'GID', set_seed = 123)
CV.KFold(pheno, DataSetID = 'GID', K = 10, set_seed = 123)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab