if (FALSE) { # rlang::is_installed("betareg")
# load libraries for models and data
library(betareg)
# load dats
data("GasolineYield", package = "betareg")
# fit model
mod <- betareg(yield ~ batch + temp, data = GasolineYield)
mod
# summarize model fit with tidiers
tidy(mod)
tidy(mod, conf.int = TRUE)
tidy(mod, conf.int = TRUE, conf.level = .99)
augment(mod)
glance(mod)
}
Run the code above in your browser using DataLab