View source: R/gt_t_dm_slide.R
gt_t_dm_slide | R Documentation |
Demographic table with gtsummary
gt_t_dm_slide(adsl, arm = "TRT01P", vars = c("AGE", "SEX", "RACE"))
adsl |
ADSL data set, dataframe |
arm |
Arm variable, character, "'TRT01P" by default. |
vars |
Characters of variables |
gtsummary object
* Default arm variables are set to '"TRT01A"' for safety output, and '"TRT01P"' for efficacy output
library(dplyr)
adsl <- eg_adsl
out1 <- gt_t_dm_slide(adsl, "TRT01P", c("SEX", "AGE", "RACE", "ETHNIC", "COUNTRY"))
print(out1)
generate_slides(out1, paste0(tempdir(), "/dm.pptx"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.