productPipeline function for when a new bsp object has been supplied — productPipelinePostBurnIn • AlphaSimHlpR

Example: post burn-in

productPipelinePostBurnIn(records, bsp, SP)

Arguments

records	The breeding program `records` object. See `fillPipeline` for details
bsp	the original parameter set used
SP	the AlphaSimR SimParam object
newbsp	the new list of breeding scheme parameters

Value

A records object that has new records created by advancing by a generation

Details

function to advance a simulated breeding product pipeline forward by one generation. See Gaynor et al. 2017 for the general idea.

The breeding program product pipeline will have been set by initializeFunc. This function moves the breeding program along by one generation and saves all the resulting phenotypes to the records object.

Examples

bsp <- specifyPipeline()
#> Error in if (bsp$nSNP + bsp$nQTL >= bsp$segSites) {    print("The number of segregating sites (segSites) has to be greater than the number of SNPs (nSNP) and the number of QTL (nQTL). segSites set 10% bigger than nSNP + nQTL")    bsp$segSites <- round((bsp$nSNP + bsp$nQTL) * 1.1) + 1}: argument is of length zero
bsp <- specifyPopulation(bsp)
#> Error in mget(setdiff(ls(), "bspNew")): object 'bsp' not found
initList <- initializeFunc(bsp)
#> Error in initializeFunc(bsp): could not find function "initializeFunc"
SP <- initList$SP
#> Error in eval(expr, envir, enclos): object 'initList' not found
bsp <- initList$bsp
#> Error in eval(expr, envir, enclos): object 'initList' not found
records <- initList$records
#> Error in eval(expr, envir, enclos): object 'initList' not found
records <- productPipeline(records, bsp, SP)
#> Error in productPipeline(records, bsp, SP): object 'records' not found
records <- popImprov1(records, bsp, SP)
#> Error in popImprov1(records, bsp, SP): could not find function "popImprov1"