calcInbreeding {pedigree}

Calculates inbreeding coefficients for individuals in a pedigree.

Description

Calculates inbreeding coefficients of individuals in a pedigree.

Usage

calcInbreeding(ped)

Arguments

ped

data.frame with three columns: id,id parent1,id parent2

Value

Logical.

Examples

id <- 1:6
dam <- c(0,0,1,1,4,4)
sire <- c(0,0,2,2,3,5)
ped <- data.frame(id,dam,sire)
(F <- calcInbreeding(ped))