powered by
Check whether an animal has both parents
hasBothParents(id, ped)
TRUE if ID has both sire and dam identified in ped.
ped
character vector of IDs to examine for parents
The pedigree information in data.frame format
library(nprcgenekeepr) ped <- nprcgenekeepr::pedOne names(ped) <- c("id", "sire", "dam", "sex", "birth") hasBothParents("o2", ped) ped$sire[ped$id == "o2"] <- NA hasBothParents("o2", ped)
Run the code above in your browser using DataLab