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()
# }
Run the code above in your browser using DataLab