Description Usage Arguments Value Examples
View source: R/removeUninformativeFounders.R
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.
1 |
ped |
datatable that is the 'Pedigree'. It contains pedigree
information. The fields |
A reduced pedigree.
1 2 3 4 5 6 7 8 9 10 11 12 13 | 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)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.