Try this: lines(fitted(lm(x ~ y)), y, lty = 2)
On Wed, Sep 10, 2008 at 4:06 PM, David Epstein <[EMAIL PROTECTED]> wrote: > > Suppose x and y are numeric vectors of the same length. > > plot(x,y) #scatterplot > lmObj1 <- lm(y~x) # best fit line > abline(lmObj1) # good > lmObj2 <- lm(x~y) #get best fit but with axes interchanged > abline(lmObj2) # not what I want. I want the correct line, drawn on the same > graph, but with > # response and predictor variables interchanged > > One way to proceed would be to extract the intercept and slope from lmObj2 > and then do the arithmetic to draw the correct line. I'm hoping for a more > streamlined method. Is there one? > > Thanks > David > -- > View this message in context: > http://www.nabble.com/reflecting-a-line-tp19422091p19422091.html > Sent from the R help mailing list archive at Nabble.com. > > ______________________________________________ > R-help@r-project.org 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@r-project.org 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.
