if (FALSE) {
Conf_griffin <- EstConf(Pedigree = SeqOUT_griffin$Pedigree,
LifeHistData = LH_griffin,
args.sim = list(nSnp = 400, SnpError = 0.001,
ParMis=0.4),
args.seq = list(Module = 'ped', Err=0.001),
nSim = 20,
nCores = 5,
quiet = TRUE)
}
Run the code above in your browser using DataLab