varAA {AlphaSimR} | R Documentation |
Returns additive-by-additive epistatic variance for all traits
varAA(pop, simParam = NULL)
pop |
an object of |
simParam |
an object of |
#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)