function uses optiSel to identify number of progeny, allocate mates to minimize inbreeding depression, and return progeny NOTE: This function assumes that all selection candidates have been genotyped If stageToGenotype has been set to a later stage, that might not be true

optContrib(records, bsp, SP, crit)

Arguments

records

The breeding program records object. See fillPipeline for details

bsp

A list of product pipeline parameters

SP

The AlphaSimR SimParam object (needed to pull SNPs)

crit

Named vector of selection criterion to be maximized

Value

Pop class object with the progeny from optimum contribution crosses

Details

Calculate a grm of individuals with high enough crit, then maximize crit subject to a target increase of relatedness consistent with bsp$targetEffPopSize

Examples

crit <- bv(records$F1); names(crit) <- records$F1@id
#> Error in get("SP", envir = .GlobalEnv): object 'SP' not found
#> Error in eval(expr, envir, enclos): object 'records' not found
progeny <- optContrib(records, bsp, SP, crit)
#> Loading required package: optiSel
#> Error in optContrib(records, bsp, SP, crit): object 'bsp' not found