nprcgenekeepr (version 1.0.5)

getIdsWithOneParent: getIdsWithOneParent extracts IDs of animals pedigree without either a sire or a dam

Description

getIdsWithOneParent extracts IDs of animals pedigree without either a sire or a dam

Usage

getIdsWithOneParent(uPed)

Arguments

uPed

a trimmed pedigree dataframe with uninformative founders removed.

Value

Character vector of all single parents

Examples

# NOT RUN {
examplePedigree <- nprcgenekeepr::examplePedigree
breederPed <- qcStudbook(examplePedigree, minParentAge = 2,
                         reportChanges = FALSE,
                         reportErrors = FALSE)
probands <- breederPed$id[!(is.na(breederPed$sire) &
                               is.na(breederPed$dam)) &
                               is.na(breederPed$exit)]
ped <- getProbandPedigree(probands, breederPed)
nrow(ped)
p <- removeUninformativeFounders(ped)
nrow(p)
p <- addBackSecondParents(p, ped)
nrow(p)
# }