## Not run: ------------------------------------
# library(synbreedData)
# data(maize)
# maizeC <- codeGeno(maize)
# # marker-based (realized) relationship matrix
# U <- kin(maizeC,ret="realized")/2
#
# # BLUP model
# mod <- gpMod(maizeC,model="BLUP",kin=U)
# summary(mod)
## ---------------------------------------------
Run the code above in your browser using DataLab