getIdsWithOneParent: Get ids of animals with only one parent

View source: R/getIdsWithOneParent.R

getIdsWithOneParentR Documentation

Get ids of animals with only one parent

Description

Get ids of animals with only one parent

Usage

getIdsWithOneParent(uPed)

Arguments

uPed

a trimmed pedigree dataframe with uninformative founders removed.

Value

Character vector of all single parents

Examples

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)
getIdsWithOneParent(p)

nprcgenekeepr documentation built on July 26, 2026, 5:06 p.m.