powered by
nai(pedigree)
sim.mpped
sim.map <- list(Chr1=seq(0,100,10)) sim.ped <- sim.mpped(4, 1, 500, 6, 1) nai(sim.ped) sim.ped <- sim.mpped(4, 1, 500, 6, 1, 5) nai(sim.ped)
Run the code above in your browser using DataLab