trimPed: Function to trim a pedigree based on available data

In pedigree: Pedigree Functions

Function to trim a pedigree based on available data

Description

Trims a pedigree given a vector of data. Branches without data are trimmed off the pedigree.

Usage

trimPed(ped, data,ngenback = NULL)

Arguments

ped	data.frame with three columns: id,id parent1,id parent2
data	TRUE-FALSE vector. Specifies if data for an individual is available.
ngenback	Number of generations back. Specifies the number of generations to keep before the individuals with data.

Value

Logical vector specifying if an individual should stay in the pedigree.

Examples

id <- 1:5
dam <- c(0,0,1,1,4)
sire <- c(0,0,2,2,3)
data <- c(FALSE,FALSE,TRUE,FALSE,FALSE)
ped <- data.frame(id,dam,sire)
yn <- trimPed(ped,data)
ped <- ped[yn,]

pedigree documentation built on Aug. 14, 2022, 1:06 a.m.