Extract data of model
model.data(fit)
fitted results
dataframe in the model
# NOT RUN { fit <- lm(mpg~vs+am+poly(qsec,2),data=mtcars) head(model.data(fit)) # }
Run the code above in your browser using DataLab