## Not run: ------------------------------------
# library(synbreedData)
# data(maize)
# maizeC <- codeGeno(maize)
#
# # LD for chr 1
# maizeLD <- pairwiseLD(maizeC,chr=1,type="matrix")
# LDMap(maizeLD,maizeC)
## ---------------------------------------------
Run the code above in your browser using DataLab