As recommended in the

Is there a way to modify the label for the quadratic term in this case?

CodePudding user response：

If you assign the label inside the tbl_regression() function, you'll see what you want to get.

library(gtsummary)

c("disp", "disp   I(disp^2)") %>% 
  purrr::map(
    ~ paste("vs", .x, sep = " ~ ") %>% 
      as.formula() %>% 
      glm(data = mtcars, family = binomial(link = "logit")) %>% 
      tbl_regression(
        exponentiate = TRUE,
        label = list(
          disp = "Displacement",
          `I(disp^2)` = "Displacement^2"
        )
      )
  ) %>%
  tbl_merge() %>%
  as_kable()
#> ✖ `I(disp^2)` terms have not been found in `x`.

^{Created on 2022-09-19 with reprex v2.0.2}