`react_base_char()`: AE table columns are incorrect when gender is factorized with "Male" and "Female"

[fukuhiro2023]

In the interactive baseline characteristics table generated by react_base_char(), the columns of AE table may not be corrected when gender is factorized with "Male" and "Female". For the subgroup of "Male", more columns are displayed than the number of treatment groups with missing name. This may be due to the following code in react_subgroup_table().

 race_columns <- grep(tolower(subgroup_name), tolower(names(tbl)), value = TRUE)

[fukuhiro2023]

Quick exmaple:

devtools::load_all()
# meta_sl
meta_sl <- meta_sl_example()
adsl <- meta_sl$data_population
adsl$SEX <- factor(adsl$SEX, levels = c("F", "M"), labels = c("Female", "Male"))
meta_sl$data_population <- adsl
# meta_ae
meta_ae <- metalite.ae::meta_ae_example()
adsl_ae <- meta_ae$data_population
adsl_ae$SEX <- factor(adsl_ae$SEX, levels = c("F", "M"), labels = c("Female", "Male"))
meta_ae$data_population <- adsl_ae

react_base_char(
  metadata_sl = meta_sl,
  metadata_ae = meta_ae,
  population = "apat",
  observation = "wk12",
  display_total = TRUE,
  sl_parameter = "gender",
  ae_subgroup = c("gender"),
  ae_specific = "rel",
  width = 1200
)

Output of the example: