Additive-by-additive epistatic variance
Returns additive-by-additive epistatic variance for all traits
varAA(pop, simParam = NULL)
#Create founder haplotypes founderPop = quickHaplo(nInd=10, nChr=1, segSites=10) #Set simulation parameters SP = SimParam$new(founderPop) SP$addTraitAD(10, meanDD=0.5) SP$setVarE(h2=0.5) #Create population pop = newPop(founderPop, simParam=SP) varAA(pop, simParam=SP)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.