## Not run: ------------------------------------
# library(synbreed)
# data(maize)
# maizeC <- codeGeno(maize)
# maizeLD <- pairwiseLD(maizeC,chr=1:10,type="data.frame")
# maizeLDm <- pairwiseLD(maizeC,chr=1:10,type="matrix")
# summary(maizeLD)
# summary(maizeLDm)
#
## ---------------------------------------------
Run the code above in your browser using DataLab