powered by
gen.simuSampleFreq( gen, pro, ancestors, stateAncestors, simulNo = "5000")
gen.genealogy
gen.simuProb
gen.simuSet
gen.simuSample
data(geneaJi) genJi<-gen.genealogy(geneaJi) gen.simuSampleFreq(genJi, pro=c(1,29), ancestors=c(20,25),stateAncestors=c(2,1), simulNo = 1000)
Run the code above in your browser using DataLab