# NOT RUN {
data(hyper)
summary(hyper)
plot(hyper)
# Note the selective genotyping
# }
# NOT RUN {
plotMissing(hyper, reorder=TRUE)
# }
# NOT RUN {
# A marker on c14 has no data; remove it
hyper <- drop.nullmarkers(hyper)
# }
Run the code above in your browser using DataLab