# NOT RUN {
model <- lm(Sepal.Length ~ Petal.Width, data = iris)
model_table(model)
summary(model_table(model))
model <- t.test(Sepal.Length ~ Species, data = iris[1:100, ])
model_table(model)
summary(model_table(model))
# }
Run the code above in your browser using DataLab