Convert data.frame into flextable

Usage

myft(x, vanilla = TRUE, fontsize = 10, digits, showid = FALSE, ...)

Arguments

x: A data.frame
vanilla: logical
fontsize: Numeric
digits: integer indicating the position of decimal place
showid: logical if TRUE, show id
...: Further arguments to be passed to df2flextable()

Value

An object of class flextable

Examples

data(acs,package="moonBook")
library(dplyr)
gaze(acs) %>% myft()
gaze(sex~.,acs) %>% myft()
fit=lm(mpg~hp*wt,data=mtcars)
gaze(fit) %>% myft()
library(survival)
fit=coxph(Surv(time,status) ~rx,data=anderson1)
gaze(fit) %>% myft()
# \donttest{
gaze(sex+Dx~.,data=acs,show.p=TRUE,show.total=TRUE,show.n=TRUE,shiw.missing=TRUE) %>% myft()
gaze(Dx+sex~cardiogenicShock,data=acs,show.p=TRUE) %>% myft()
gaze(Dx+sex+HBP~cardiogenicShock,data=acs,show.p=TRUE) %>% myft()
# }