Quick example in readme and CRAN vignette needs an update

[nanxstats]

The quick example in README.md probably needs an update:

library("forestly")

meta_forestly(
  forestly_adsl,
  forestly_adae
) |>
  prepare_ae_forestly(parameter = "any;rel;ser") |>
  format_ae_forestly() |>
  ae_forestly()

Error in vapply(parameters, function(x) metalite::collect_adam_mapping(outdata$meta,  : 
  values must be length 1,
 but FUN(X[[3]]) result is length 0
In addition: Warning messages:
1: In metalite.ae::prepare_ae_specific(meta, population = population,  :
  In observation level data, force group variable 'TRTA' be a factor
2: In metalite.ae::prepare_ae_specific(meta, population = population,  :
  In observation level data, force group variable 'TRTA' be a factor
3: In metalite.ae::prepare_ae_specific(meta, population = population,  :
  In observation level data, force group variable 'TRTA' be a factor

Also the vignette:

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,
  population_subset = SAFFL == "Y",
  observation_subset = SAFFL == "Y"
) |>
  prepare_ae_forestly(parameter = "any;rel;ser") |>
  format_ae_forestly() |>
  ae_forestly()

Error in vapply(parameters, function(x) metalite::collect_adam_mapping(outdata$meta,  : 
  values must be length 1,
 but FUN(X[[3]]) result is length 0