FDA Figure 2

Time to Last Follow Up, Safety Population, Pooled Analyses

# Load Libraries & Data
library(cardinal)

adsl <- random.cdisc.data::cadsl
adsl$EOSDY <- sample(0:400, nrow(adsl), replace = TRUE)

# Output Figure
make_fig_02(df = adsl)

make_fig_02()

Required variables:

  • df: The variables specified by arm_var, id_var, saffl_var, and eosdy_var.
Argument Description Default
df (data.frame) Dataset (typically ADSL) required to build table. No default
arm_var (character) Arm variable used to split table into columns. "ARM"
saffl_var (character) Flag variable used to indicate inclusion in safety population. "SAFFL"
id_var (character) Identifier variable used to count the participants within each flag. "USUBJID"
eosdy_var (character) Variable denoting last recorded (relative) study day. "EOSDY"
u_trtdur (character) Unit for duration of treatment. Options are "days", "weeks", "months" and "years". "days"
x_lab (character) x-axis label. paste0("Time from first dose (", u_trtdur, ")")
y_lab (character) y-axis label. "Percent of Patients (%)"
xticks (vector of numeric) x-axis tick positions. If NA (default), tick mark positions are automatically calculated. NA
add_table (flag) whether “Number of Patients” table should be printed under the plot. TRUE
annotations (named list of character) List of annotations to add to the table. Valid annotation types are title, subtitles, and caption. Each name-value pair should use the annotation type as name and the desired string as value. NULL

Source code for this function is available here.