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
|
\name{geom_linerange}
\alias{geom_linerange}
\alias{GeomLinerange}
\title{geom\_linerange}
\description{An interval represented by a vertical line}
\details{
This page describes geom\_linerange, see \code{\link{layer}} and \code{\link{qplot}} for how to create a complete plot from individual components.
}
\section{Aesthetics}{
The following aesthetics can be used with geom\_linerange. Aesthetics are mapped to variables in the data with the aes function: \code{geom\_linerange(aes(x = var))}
\itemize{
\item \code{x}: x position (\strong{required})
\item \code{ymin}: bottom (vertical minimum) (\strong{required})
\item \code{ymax}: top (vertical maximum) (\strong{required})
\item \code{colour}: border colour
\item \code{size}: size
\item \code{linetype}: line type
\item \code{alpha}: transparency
}
}
\usage{geom_linerange(mapping = NULL, data = NULL, stat = "identity",
position = "identity", ...)}
\arguments{
\item{mapping}{mapping between variables and aesthetics generated by aes}
\item{data}{dataset used in this layer, if not specified uses plot dataset}
\item{stat}{statistic used by this layer}
\item{position}{position adjustment used by this layer}
\item{...}{ignored }
}
\seealso{\itemize{
\item \code{\link{geom_errorbar}}: error bars
\item \code{\link{geom_pointrange}}: range indicated by straight line, with point in the middle
\item \code{\link{geom_crossbar}}: hollow bar with middle indicated by horizontal line
\item \code{\link{stat_summary}}: examples of these guys in use
\item \code{\link{geom_smooth}}: for continuous analog
\item \url{http://had.co.nz/ggplot2/geom_linerange.html}
}}
\value{A \code{\link{layer}}}
\examples{\dontrun{
# Generate data: means and standard errors of means for prices
# for each type of cut
dmod <- lm(price ~ cut, data=diamonds)
cuts <- data.frame(cut=unique(diamonds$cut), predict(dmod, data.frame(cut = unique(diamonds$cut)), se=T)[c("fit","se.fit")])
qplot(cut, fit, data=cuts)
# With a bar chart, we are comparing lengths, so the y-axis is
# automatically extended to include 0
qplot(cut, fit, data=cuts, geom="bar")
# Display estimates and standard errors in various ways
se <- ggplot(cuts, aes(cut, fit,
ymin = fit - se.fit, ymax=fit + se.fit, colour = cut))
se + geom_linerange()
se + geom_pointrange()
se + geom_errorbar(width = 0.5)
se + geom_crossbar(width = 0.5)
# Use coord_flip to flip the x and y axes
se + geom_linerange() + coord_flip()
}}
\author{Hadley Wickham, \url{http://had.co.nz/}}
\keyword{hplot}
|
