The R Project SVN R

Rev

Rev 59039 | Rev 88548 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 59039 Rev 61168
Line 41... Line 41...
41
  \code{\link{xtabs}} for ways to display these data as a table.
41
  \code{\link{xtabs}} for ways to display these data as a table.
42
}
42
}
43
\examples{
43
\examples{
44
require(stats); require(graphics)
44
require(stats); require(graphics)
45
summary(warpbreaks)
45
summary(warpbreaks)
46
opar <- par(mfrow = c(1,2), oma = c(0, 0, 1.1, 0))
46
opar <- par(mfrow = c(1, 2), oma = c(0, 0, 1.1, 0))
47
plot(breaks ~ tension, data = warpbreaks, col = "lightgray",
47
plot(breaks ~ tension, data = warpbreaks, col = "lightgray",
48
     varwidth = TRUE, subset = wool == "A", main = "Wool A")
48
     varwidth = TRUE, subset = wool == "A", main = "Wool A")
49
plot(breaks ~ tension, data = warpbreaks, col = "lightgray",
49
plot(breaks ~ tension, data = warpbreaks, col = "lightgray",
50
     varwidth = TRUE, subset = wool == "B", main = "Wool B")
50
     varwidth = TRUE, subset = wool == "B", main = "Wool B")
51
mtext("warpbreaks data", side = 3, outer = TRUE)
51
mtext("warpbreaks data", side = 3, outer = TRUE)