trimPed {pedigree}R Documentation

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)

Arguments

ped data.frame with three columns: id,id parent1,id parent2
data TRUE-FALSE vector. Specifies if data for an individual is available.

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,]

[Package pedigree version 1.1 Index]