meta <- meta_ae_example()
outdata <- prepare_ae_specific(meta,
population = "apat",
observation = "wk12",
parameter = "rel"
)
# Basic example
tbl <- outdata |>
format_ae_specific()
head(tbl$tbl)
# Display different measurements
tbl <- outdata |>
extend_ae_specific_events() |>
format_ae_specific(display = c("n", "prop", "events"))
head(tbl$tbl)
Run the code above in your browser using DataLab