R 中多个 glm 对象的变量列表循环

Question

我无法终生明白为什么这在 R 中对我不起作用:(

## Unadjusted model 
noadj_var <- list("a",
                  "b",
                  "c",
                  "d",
                  )

for (i in 1:length(noadj_var)) {
  paste0("unadjusted_model_",i) <- glm(
    df$dependent_variable ~ i,
    data = df[df$present_2018 == "Yes" , ],
    family = binomial(link=logit),
    na.action = na.exclude
  )
}

我收到错误：

Error in model.frame.default(formula = df$dependent_variable ~ i, data = df[df$present_2018 ==  : 
 variable lengths differ (found for 'i')

我不明白为什么当我有 na.action = na.exclude 时会出现此错误

还有其他东西被搞砸了吗？

在此之前，变量名称“a”、“b”、“c”不是真实名称，我不能只将它们更改为序列，它需要是一个字符串列表。

Answer 1

咕噜声purrr的另一种可能性：

 list("a",
       "b",
       "c",
       "d",
  ) %>% 
    purrr::set_names(paste0("unadjusted_model_", .)) %>% 
    purrr::map(~glm(reformulate(.x, 'dependent_variable'),data = df),
               family = binomial(link=logit),
               na.action = na.exclude ) %>% 
    purrr::map(broom::tidy)