# An Introduction to the forestly Package

Here is only a minimal example:

    library(forestly)

    forestly_adsl$TRTA <- factor(forestly_adsl$TRT01A, levels = c("Xanomeline Low Dose", "Placebo"), labels = c("Low Dose", "Placebo"))

    forestly_adae$TRTA <- factor(forestly_adae$TRTA, levels = c("Xanomeline Low Dose", "Placebo"), labels = c("Low Dose", "Placebo"))

    meta_forestly(
      dataset_adsl = forestly_adsl,
      dataset_adae = forestly_adae,
      parameter_term = "any;rel;ser",
      population_subset = SAFFL == "Y",
      observation_subset = SAFFL == "Y"
    ) |>
      prepare_ae_forestly(parameter = "any;rel;ser") |>
      format_ae_forestly() |>
      ae_forestly()