library(report)
# h-tests
report_info(t.test(iris$Sepal.Width, iris$Sepal.Length))
# ANOVAs
report_info(aov(Sepal.Length ~ Species, data = iris))
# \donttest{
# GLMs
report_info(lm(Sepal.Length ~ Petal.Length * Species, data = iris))
report_info(lm(Sepal.Length ~ Petal.Length * Species, data = iris), include_effectsize = TRUE)
report_info(glm(vs ~ disp, data = mtcars, family = "binomial"))
# }
# \donttest{
# Mixed models
library(lme4)
model <- lme4::lmer(Sepal.Length ~ Petal.Length + (1 | Species), data = iris)
report_info(model)
# }
if (FALSE) { # requireNamespace("rstanarm", quietly = TRUE)
# \donttest{
# Bayesian models
library(rstanarm)
model <- suppressWarnings(stan_glm(Sepal.Length ~ Species, data = iris, refresh = 0, iter = 300))
report_info(model)
# }
}
Run the code above in your browser using DataLab