add.pedigree {synbreed} | R Documentation |
pedigree
objectThis function can be used to add some pedigree information to a existing pedigree
object.
add.pedigree(ped, IDadd, add.ancestors = FALSE)
ped |
|
IDadd |
|
add.ancestors |
|
Missing values for parents in the pedigree should be coded with 0 for
numeric ID or NA
for character ID.
An object of class pedigree
. Column gener
starts from
0 and pedigree is sorted by generation.
Hans-Juergen Auinger
plot.pedigree, create.pedigree
# example with 9 individuals id <- paste("ID", 1:9, sep = "0") par1 <- paste("ID", c("", "", "", "", 1, 1, 1, 4, 7), sep = "0") par2 <- paste("ID", c("", "", "", "", 2, 3, 2, 5, 8), sep = "0") ped1 <- create.pedigree(id, par1, par2, unknown = "ID0") # create 2nd pedigree object Id <- paste("ID", 10:16, sep = "") Par1 <- paste("ID", c("", "", 1, 1, 6, 7, 7), sep = "0") Par2 <- paste("ID", c("", "", 10, "08", "09", 11, 14), sep = "") ped2 <- create.pedigree(Id, Par1, Par2, unknown = c("ID0", "ID")) ped2 ped <- add.pedigree(ped1, ped2) ped