# \donttest{
tbl <-
df_adverse_events %>%
tbl_ae(
id = patient_id,
ae = adverse_event,
soc = system_organ_class,
by = grade
)
show_header_names(tbl)
inline_text(tbl, "Anaemia", column = stat_5)
# }
Run the code above in your browser using DataLab