The R Project SVN R

Rev

Rev 68948 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 68948 Rev 80079
Line 88... Line 88...
88
 
88
 
89
## text.formula() can be very natural:
89
## text.formula() can be very natural:
90
wb <- within(warpbreaks, {
90
wb <- within(warpbreaks, {
91
    time <- seq_along(breaks); W.T <- wool:tension })
91
    time <- seq_along(breaks); W.T <- wool:tension })
92
plot(breaks ~ time, data = wb, type = "b")
92
plot(breaks ~ time, data = wb, type = "b")
93
text(breaks ~ time, data = wb, label = W.T, col = 1+as.integer(wool))
93
text(breaks ~ time, data = wb, labels = W.T, col = 1+as.integer(wool))
94
}
94
}
95
\keyword{hplot}% plot
95
\keyword{hplot}% plot
96
\keyword{aplot}% points, etc
96
\keyword{aplot}% points, etc