# NOT RUN {
data(hyper) # hyper dataset
# }
# NOT RUN {
hyperfilled <- fill.geno(hyper)
cofactors <- mqmautocofactors(hyperfilled,15) # Set 15 Cofactors
result <- mqmscan(hyperfilled,cofactors) # Backward model selection
mqmgetmodel(result)
# }
Run the code above in your browser using DataLab