We show a plot similar to the showed at Linear regression on the mtcars dataset. First with defaults and the with some customization of the parameters.
#help("mtcars")
fit <- lm(mpg ~ wt, data = mtcars)
bs <- round(coef(fit), 3)
lmlab <- paste0("mpg = ", bs[1],
...