produce a flextable describing a
generalized linear model produced by function glm
.
# S3 method for glm
as_flextable(x, ...)
glm model
unused argument
Other as_flextable methods:
as_flextable.gam()
,
as_flextable.grouped_data()
,
as_flextable.htest()
,
as_flextable.lm()
,
as_flextable.xtable()
,
as_flextable()
# NOT RUN {
if(require("broom")){
dat <- attitude
dat$high.rating <- (dat$rating > 70)
probit.model <- glm(high.rating ~ learning + critical +
advance, data=dat, family = binomial(link = "probit"))
ft <- as_flextable(probit.model)
ft
}
# }
Run the code above in your browser using DataLab