创建gtsummary表格的glm时出错。

这个问题可能与变量类型不匹配有关。请确保 glm 中使用的所有变量都是数值变量，而不是字符型或逻辑型变量。下面是一个示例，说明如何使用 mutate 将字符型变量转化为数值变量，在创建 glm 之前进行转换：

library(dplyr)
library(gtsummary)

# 假设 example_data 中包含了一个名为 "gender" 的字符型变量
example_data <- tibble::tribble(
            ~height, ~weight, ~gender,
              1.73,     70,  "男性",
              1.65,     62,  "女性",
              1.82,     82,  "男性",
              1.78,     76,  "男性"
            )

# 将 "gender" 转化为数值变量
example_data <- example_data %>% 
  mutate(gender_num = ifelse(gender == "男性", 1, 0))

# 创建 gtsummary 表格
table1 <- example_data %>%
  select(-gender) %>%
  tbl_summary(by = gender_num) %>%
  add_glm() # 添加 glm 模型

在这个示例中，我们首先使用 mutate 将 "gender" 转化为数值变量，并将结果存储为新的 "gender_num" 变量。然后，我们选择除 "gender" 之外的所有变量，创建 gtsummary 表格，并添加 glm 模型。这样，我们就可以成功创建包含 glm 模型的 gtsummary 表格了。