使用 gtsummary 生成表摘要时出现胶合语法错误

Question

感谢任何帮助修复此错误。 谢谢：我正在使用的代码：

adata_sl %>% 
  select(BLADA_FL,PREVADA_FL,TRTP) %>% #mutate(BLADA_FL=ifelse(BLADA_FL=="Negative",NA_character_,BLADA_FL)) %>% 
  tbl_summary(value=list(PREVADA_FL~"Positive"),
              label=list(BLADA_FL~"Baseline",PREVADA_FL~"Prevalence"),
              missing_text = "Missing",by=TRTP) %>%
  add_overall(last=T,col_label="**Overall** \n (N={n})") %>% 
  modify_header(list(label ~ "**outcome**"),stat_by = "**{level}** \n (N={n})") %>% 
  modify_footnote(everything() ~ NA) %>% 
  as_gt() %>% 
  tab_options(table.font.size="small")

我收到的错误：✖ 处理列“stat_0”时出现错误——可能是胶合语法错误。 ℹ 以下字段可通过粘合语法插入：column (), N () Error: Error processing modify_*() for column 'stat_0'。