aa {AlphaSimR} | R Documentation |
Returns additive-by-additive epistatic deviations for all traits
aa(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) aa(pop, simParam=SP)