1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73
|
\name{plot.geno}
\alias{plot.geno}
\title{Plot observed genotypes, flagging likely errors}
\description{
Plot the genotypes on a particular chromosome for a set of
individuals, flagging likely errors.
}
\usage{
plot.geno(x, chr, ind, include.xo=TRUE, horizontal=TRUE,
cutoff=4, min.sep=2, cex=1.2, \dots)
}
\arguments{
\item{x}{An object of class \code{cross}. See
\code{\link[qtl]{read.cross}} for details. }
\item{chr}{Chromosome number to plot.}
\item{ind}{Vector of individuals to plot. If missing, all individuals
are plotted.}
\item{include.xo}{If TRUE, plot X's in intervals having a
crossover. Not available for a 4-way cross.}
\item{horizontal}{If TRUE, chromosomes are plotted horizontally.}
\item{cutoff}{Genotypes with error LOD scores above this value are
flagged as possible errors.}
\item{min.sep}{Markers separated by less than this value (as a
percent of the chromosome length) are pulled apart, so that they may
be distinguished in the picture.}
\item{cex}{Character expansion for the size of points in the plot.
Larger numbers give larger points; see \code{\link[qtl]{par}}.}
\item{\dots}{Ignored at this point.}
}
\details{
Plots the genotypes for a set of individuals. Likely errors are
indicated by red squares. In a backcross, genotypes AA and AB are
indicated by white and black circles, respectively. In an intercross,
genotypes AA, AB and BB are indicated by white, gray, and black
circles, respectively, and the partially missing genotypes "not BB"
(D in mapmaker) and "not AA" (C in mapmaker) are indicated by green
and orange circles, respectively.
For a 4-way cross, two lines are plotted for each individual. The
left or upper line indicates the allele A (white) or B (black); the
right or lower line indicates the allele C (white) or D (black). For
the case that genotype is known to be only AC/BD or AD/BC, we use
green and orange, respectively.
}
\value{None.}
\examples{
data(hyper)
\dontshow{hyper <- subset(hyper, chr=c(1,19))}
# Calculate error LOD scores
hyper <- calc.errorlod(hyper,error.prob=0.01)
# print those above a specified cutoff
top.errorlod(hyper,cutoff=4)
# plot genotype data, flagging genotypes with error LOD > cutoff
plot.geno(hyper, chr=1, ind=160:200, cutoff=7, min.sep=2)
}
\seealso{ \code{\link[qtl]{calc.errorlod}},
\code{\link[qtl]{top.errorlod}} }
\author{Karl W Broman, \email{kbroman@biostat.wisc.edu} }
\keyword{hplot}
|