Convert simtab_rbind_tb Object to Flextable
Arguments
- x
A
simtab_rbind_tbobject.- footnotes
Optional character vector of footer lines appended to the table.
- ...
Additional arguments passed to
flextable::flextable().
Examples
if (requireNamespace("flextable", quietly = TRUE)) {
t1 <- tb(epitabl, sex, diabetes)
t2 <- tb(epitabl, hypertension, diabetes)
as_flextable.simtab_rbind_tb(rbind(t1, t2))
}
Variable
No
Yes
Total
Sex recorded for clinical assessment
Female
517
169
686
Male
610
204
814
History of hypertension
No
566
166
732
Yes
561
207
768
Total
1127
373
1500