NA#" ) ) %>% add_difference( estimate_fun = everything() ~ function(x) paste0(style_sigfig((-x/2) * 100), "%") ), .header = "**{strata}**" ) |> modify_column_hide(columns = c(p.value_1,ci_1,p.value_2,ci_2)) |> # remove difference footnote modify_footnote(update...