nprcgenekeepr (version 1.0.5)

setPopulation: Population designation function

Description

Part of the pedigree filtering toolset.

Usage

setPopulation(ped, ids)

Arguments

ped

datatable that is the `Pedigree`. It contains pedigree information. The id column is required.

ids

character vector of IDs to be flagged as part of the population under consideration.

Value

An updated pedigree with the population column added or updated by being set to TRUE for the animal IDs in ped$id and FALSE otherwise.

Examples

# NOT RUN {
examplePedigree <- nprcgenekeepr::examplePedigree
breederPed <- qcStudbook(examplePedigree, minParentAge = 2,
                         reportChanges = FALSE,
                         reportErrors = FALSE)
focalAnimals <- breederPed$id[!(is.na(breederPed$sire) &
                                  is.na(breederPed$dam)) &
                                is.na(breederPed$exit)]
breederPed <- setPopulation(ped = breederPed, ids = focalAnimals)
nrow(breederPed[breederPed$population, ])
# }
# NOT RUN {
# }