# NOT RUN {
data(hyper)
# }
# NOT RUN {
hyperfilled <- fill.geno(hyper)
cofactors <- mqmsetcofactors(hyperfilled,4)
result <- mqmscan(hyperfilled,cofactors)
mqmgetmodel(result)
plot(mqmgetmodel(result))
# }
Run the code above in your browser using DataLab