plot.pedigree.shrink {kinship2}

plot pedigree.shrink object that is a shrunk pedigree object

Description

Plot the pedigree object that is the trimmed pedigree.shrink object along with colors based on availability and affection status.

Usage

## S3 method for class 'pedigree.shrink'
plot(x, bigped=FALSE, title="", xlegend="topright", ...)

Arguments

x

A pedigree.shrink object, which contains a pedigree object and information about which subject was removed.

bigped

Logical value indicating whether pedigree should be compacted to fit in plotting region. If T, then packed=F is used in pedigree() along with smaller symbol sizes.

title

Optional plot title

xlegend

The x argument for the legend command, which allows coordinates or, more conveniently, options such as "topright", "right", "left", "bottomleft", etc., which is useful for pedigrees that cover most of the plot region.

...

Optional arguments to plot method

See Also

pedigree.shrink,

Examples

data(sample.ped)

fam2 <- sample.ped[sample.ped$ped==2,]
ped2 <- pedigree(fam2$id, fam2$father, fam2$mother, fam2$sex,
                 fam2$affected, fam2$avail)

shrink2 <- pedigree.shrink(ped2,avail=fam2$avail)
shrink2

plot(ped2)

plot.pedigree.shrink(shrink2, title="Sample Pedigree 2")