From the r-help mailing list:
x <- rnorm(10) y <- runif(10) z <- 1:10plot(x~z, ylim=range(x, y), type='l') lines(y, col='red')
R-Cookbook.com is a collection of "recipes"--problems, solutions, and working examples--contributed by the R community in order to share code, promote the use of R, and make the learning process more efficient for new users.