produce a flextable describing an
object oof class htest
.
# S3 method for htest
as_flextable(x, ...)
htest object
unused argument
Other as_flextable methods:
as_flextable.gam()
,
as_flextable.glm()
,
as_flextable.grouped_data()
,
as_flextable.lm()
,
as_flextable.tabulator()
,
as_flextable.xtable()
,
as_flextable()
if(require("stats")){
M <- as.table(rbind(c(762, 327, 468), c(484, 239, 477)))
dimnames(M) <- list(gender = c("F", "M"),
party = c("Democrat","Independent", "Republican"))
ft_1 <- as_flextable(chisq.test(M))
ft_1
}
#> a flextable object.
#> col_keys: `statistic`, `p.value`, `parameter`, `method`
#> header has 1 row(s)
#> body has 1 row(s)
#> original dataset sample:
#> statistic p.value parameter method
#> X-squared 30.07015 2.953589e-07 2 Pearson's Chi-squared test