(This article was first published on

Let's add a fit line to a scatterplot!**Mollie's Research Blog**, and kindly contributed to R-bloggers)### Fit Line in Base Graphics

Here's how to do it in**base**graphics:

ols <- lm(Temp ~ Solar.R,

data = airquality)

summary(ols)

plot(Temp ~ Solar.R,

data = airquality)

abline(ols)

Fit line in base graphics in R |

### Fit Line in ggplot

And here's how to do it in

You can access the info from your regression results through ols$coefficients.

**ggplot**:library(ggplot2)

ggplot(data = airquality,

aes(Solar.R, Temp)) +

geom_point(pch = 19) +

geom_abline(intercept = ols$coefficients[1],

slope = ols$coefficients[2])

You can access the info from your regression results through ols$coefficients.

Fit line in ggplot in R |

### Fit Line in Lattice

In

**lattice**, it's even easier. You don't even need to run a regression; you can just add to the*type*option.library(lattice)

xyplot(Temp ~ Solar.R,

data = airquality,

type = c("p", "r"))

Fit Line in Lattice in R |

### References

To

**leave a comment**for the author, please follow the link and comment on his blog:**Mollie's Research Blog**.R-bloggers.com offers

**daily e-mail updates**about R news and tutorials on topics such as: visualization (ggplot2, Boxplots, maps, animation), programming (RStudio, Sweave, LaTeX, SQL, Eclipse, git, hadoop, Web Scraping) statistics (regression, PCA, time series, trading) and more...