knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
library(add2evaluation)
fit <- 
  mtcars %>% 
  lm(disp ~ mpg, data = .)
library(zeallot)
c(model, coefficients, observations) %<-% groom_model(fit)
model
coefficients
observations


JiaxiangBU/add2evaluation documentation built on Jan. 21, 2020, 7:05 a.m.