Skip to content

add a linear regression line to the plot

5 messages · wangxipei, ONKELINX, Thierry, Patrick Connolly +2 more

#
Such things are very easy with the ggplot2 package

install.packages("ggplot2")
library(ggplot2)
Dataset <- data.frame(A = c(10,20,40,80), B = c(30,40,100,200))
ggplot(data = Dataset, aes(x = A, y = B)) + geom_point() +
geom_smooth(method = "lm")

More info and example on the ggplot2 website: http://had.co.nz/ggplot2/

Best regards,

Thierry

------------------------------------------------------------------------
----
ir. Thierry Onkelinx
Instituut voor natuur- en bosonderzoek
team Biometrie & Kwaliteitszorg
Gaverstraat 4
9500 Geraardsbergen
Belgium

Research Institute for Nature and Forest
team Biometrics & Quality Assurance
Gaverstraat 4
9500 Geraardsbergen
Belgium

tel. + 32 54/436 185
Thierry.Onkelinx at inbo.be
www.inbo.be

To call in the statistician after the experiment is done may be no more
than asking him to perform a post-mortem examination: he may be able to
say what the experiment died of.
~ Sir Ronald Aylmer Fisher

The plural of anecdote is not data.
~ Roger Brinner

The combination of some data and an aching desire for an answer does not
ensure that a reasonable answer can be extracted from a given body of
data.
~ John Tukey
#
On Thu, 13-Jan-2011 at 04:35PM +0800, wangxipei wrote:
|>  
|> Dear R users,
|>    I am a new R user. My problem is very simple: I want to add a linear regression line to the plot(type="p"), codes are as below:
|>  
|> x<-c(10,20,40,80)
|> y<-c(30,40,100,200)
|> plot(x,y,type="p")
|> lines(lm(x~y),col="red",lwd=1.5)
|>  
|> I got only plot without linear line.
|> Many thanks ahead for your advice!

What about if you tried 
lines(lm(y~x),col="red",lwd=1.5)

My guess is that would be more likely to work.
#
Hi,
should be

abline(lm(y~x),col="red",lwd=1.5)

hth.

Am 13.01.2011 09:35, schrieb wangxipei: