This is a paragraph in an R Markdown document. Below is a code chunk:
fit = lm(dist ~ speed, data = cars) b = coef(fit) plot(cars) abline(fit)
The slope of the regression is -17.5790949.