Use segments. In the following we overlay the black abline with a wider red segments line segment:
set.seed(1) x <- rnorm(50) y <- rnorm(50) plot(y ~ x) y.lm <- lm(y ~ x) abline(y.lm) # omit this line if black abline not wanted x0 <- c(-2, 4) y0 <- predict(y.lm, list(x = x0)) segments(x0[1], y0[1], x0[2], y0[2], col = "red", lwd = 2) On 1/16/07, BBands <[EMAIL PROTECTED]> wrote: > Dear HelpeRs, > > Given: > x <- rnorm(50) > y <- rnorm(50) > plot(x,y) > abline(lm(x ~ y)) > > Is there a way to plot just a portion of the line? Say for values of x > > 2.0 or x > -2.0 and x < 4.0. (Still fitting all the points.) > > Thank you, > > jab > -- > John Bollinger, CFA, CMT > www.BollingerBands.com > > If you advance far enough, you arrive at the beginning. > > ______________________________________________ > R-help@stat.math.ethz.ch mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. > ______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.