\Header{title}{Plot Annotation}
\keyword{aplot}{title}
\begin{Description}\relax
This function can be used to add labels to a plot.  Its first four
principal arguments can also be used as arguments in most high-level
plotting functions.  They must be of type \code{\Link{character}} or
\code{\Link{expression}}. In the latter case, quite a bit of
mathematical notation is available such as sub- and superscripts,
greek letters, fractions, etc.\end{Description}
\begin{Usage}
\begin{verbatim}
title(main = "", sub = "", xlab = "", ylab = "",
      line = NA, outer = FALSE, ...)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{main}] The main title (on top) using font and size (character
expansion) \code{par("font.main")} and color
\code{par("col.main")}.
\item[\code{sub}] Sub-title (at bottom) using font and size
\code{par("font.sub")} and color \code{par("col.sub")}.
\item[\code{xlab}] X axis label using font and character expansion
\code{par("font.axis")} and color \code{par("col.axis")}.
\item[\code{ylab}] Y axis label, same font attributes as \code{xlab}.
\item[\code{line}] specifying a value for \code{line} overrides the
default placement of labels, and places them this many lines
from the plot.
\item[\code{outer}] a logical value.  If \code{TRUE}, the titles are
placed in the outer margins of the plot.
\item[\code{...}] further graphical parameters (from \code{\Link{par}}).
\end{ldescription}
\end{Arguments}
\begin{Details}\relax
The labels passed to title can be simple strings or expressions,
or they can be a list containing the string to be plotted, and
a selection of the optional modifying graphical parameters
\code{cex=}, \code{col=}, \code{font=}.\end{Details}
\begin{SeeAlso}\relax
\code{\Link{mtext}}, \code{\Link{text}};
\code{\Link{plotmath}} for details on mathematical annotation.\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}

plot(cars, main = "")
title(main = "Stopping Distance versus Speed")

plot(cars, main = "")
title(main = list("Stopping Distance versus Speed", cex=1.25,
      col="red", font=3))

x <- seq(-4, 4, len = 101)
y <- cbind(sin(x), cos(x))
matplot(x, y, type = "l", xaxt = "n",
        main = expression(paste(plain(sin) * phi, "  and  ",
                                plain(cos) * phi)),
        ylab = expression("sin" * phi, "cos" * phi), # only 1st is taken
        xlab = expression(paste("Phase Angle ", phi)),
        col.main = "blue")
axis(1, at = c(-pi, -pi/2, 0, pi/2, pi),
     lab = expression(-pi, -pi/2, 0, pi/2, pi))
abline(h = 0, v = pi/2 * c(-1,1), lty = 2, lwd = .1, col = "gray70")
\end{ExampleCode}
\end{Examples}

