makeDsim(pedigree, N, invertD = FALSE, calcSE = FALSE)makeD) is only an approximation. They proposed a simulation method that is implemented here. This should be more appropriate when inbreeding occurs in the pedigree. The value, listDsim will list both the approximate values (returned from makeD) as well as the simulated values. If calcSE is TRUE, these values will be listed in listDsim.
makeDsimDinvMat <- makeDsim(Mrode9, N = 1000, invertD = FALSE, calcSE = TRUE)$listDsimRun the code above in your browser using DataLab