par(mfrow=c(3,3),mar=c(3,2,2,1)) ## 9 plots on one page x <- runif(100,0,20) for(i in 1:9){ y <- x + rnorm(100) m <- lm(y ~ x) plot(m,which=1) }
0 comments:
Post a Comment