create.pedigree {synbreed}R Documentation

Create pedigree object

Description

This function can be used to create a pedigree object.

Usage

create.pedigree(
  ID,
  Par1,
  Par2,
  gener = NULL,
  sex = NULL,
  add.ancestors = FALSE,
  unknown = 0
)

Arguments

ID

vector of unique IDs identifying individuals

Par1

vector of IDs identifying parent 1 (with animals: sire)

Par2

vector of IDs identifying parent 2 (with animals: dam)

gener

vector identifying the generation. If NULL gener will be 0 for unknown parents and max(gener(Par1),gener(Par2))+1 for generations 1,... .

sex

vector identifying the sex (female=0 and male=1).

add.ancestors

logical. Add ancestors which do not occur in ID to the pedigree.

unknown

value for unknown or missing ancestors.

Details

Missing values for parents in the pedigree should be coded NA. 0 is treaded as unknown, too.

Value

An object of class pedigree. Column gener starts from 0 and pedigree is sorted by generation.

Author(s)

Valentin Wimmer

See Also

plot.pedigree, add.pedigree

Examples


# example with 9 individuals
id <- paste("ID", 1:9, sep = "0")
par1 <- paste("ID", c(0, 0, 0, 0, 1, 1, 1, 4, 7), sep = "")
par2 <- paste("ID", c("", "", "", "", 2, 3, 2, 5, 8), sep = "")
gener <- c(0, 0, 0, 0, 1, 1, 1, 2, 3)

# create pedigree object (using argument gener)
ped <- create.pedigree(id, par1, par2, gener, unknown = c("ID0", "ID"))
ped
plot(ped)

# create pedigree object (without using argument gener)
ped2 <- create.pedigree(id, par1, par2, unknown = c("ID0", "ID"))
ped2

[Package synbreed version 0.12-14 Index]