# \donttest{
tbl_cross <-
tbl_cross(trial, row = trt, col = response) %>%
add_p()
inline_text(tbl_cross, row_level = "Drug A", col_level = "1")
inline_text(tbl_cross, row_level = "Total", col_level = "1")
inline_text(tbl_cross, col_level = "p.value")
# }
Run the code above in your browser using DataLab