Commit ab2c75f5 authored by kfield's avatar kfield

Add and edit report.Rmd

parent 0544beb0
Below is a scatter plot with the regression line.
```{r plot, fig.height=5}
par(mar = c(4, 4, 1, 1))
plot(regFormula(), data = mtcars, pch = 19, col = 'black', alpha=0.8)
abline(fit, col = 'gray', lwd = 2)
Here is my regression model:
```{r model, collapse=TRUE}
options(digits = 4)
fit <- lm(regFormula(), data = mtcars)
b <- coef(fit)
The fitting result is $mpg = `r b[1]` + `r b[2]``r input$x`$.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment