Level 0 function that checks if the csd locus has been activated. See SimParamBee for more information about the csd locus.

isCsdActive(simParamBee = NULL)

Arguments

simParamBee

SimParamBee, global simulation parameters

Value

logical

Examples

founderGenomes <- quickHaplo(nInd = 3, nChr = 3, segSites = 100)
SP <- SimParamBee$new(founderGenomes, csdChr = NULL)
SP$nThreads = 1L
isCsdActive()
#> Error in get(x = "SP", envir = .GlobalEnv): object 'SP' not found

SP <- SimParamBee$new(founderGenomes)
SP$nThreads = 1L
isCsdActive()
#> Error in get(x = "SP", envir = .GlobalEnv): object 'SP' not found