## S3 method for class 'linkdat':
plot(x, marker = NULL, alleles = NULL, sep = "", missing = "-",
id.labels = x$orig.ids, title = paste("Family", x$famid),
available = FALSE, col =1, deceased = numeric(0),
starred = numeric(0), aff2 = NULL, margins = c(4.1, 1, 4.1, 1), ...)linkdat object.plot.pedigree from the kinship package. In particular symbolsize is useful.plot.pedigree from the kinship package.plot.pedigreedata(toyped)
x = linkdat(toyped)
plot(x, marker=1, alleles=c("a1","a2"), sep="| ", deceased=2)Run the code above in your browser using DataLab