removeUninformativeFounders: Remove uninformative founders.
In nprcgenekeepr: Genetic Tools for Colony Management

View source: R/removeUninformativeFounders.R

removeUninformativeFounders

R Documentation

Remove uninformative founders.

Description

Founders (having unknown sire and dam) that appear only one time in a pedigree are uninformative and can be removed from a pedigree without loss of information.

Usage

removeUninformativeFounders(ped)

Arguments

ped

datatable that is the Pedigree. It contains pedigree information. The fields sire and dam are required.

Value

A reduced pedigree.

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)

nprcgenekeepr documentation built on June 8, 2025, 10:55 a.m.