r - 如何在 R 的回归输出中显示变量的名称(存储在列表中)？

Question

我是 R 的新手，抱歉，如果没有很清楚地解释。
我需要检查许多回归模型的系数。我想查看我的主要预测变量和潜在协变量的每一种可能组合。创建一个自定义函数，然后一个嵌套的 for 循环，我能够得到我想要的输出......完美!唯一的问题是变量的名称没有出现在输出中，这使得阅读非常困难。
所有变量都保存在 2 个列表中，列表已使用 names() 命名。 .在之前的计算中，名称会自动出现在结果中，但这里没有。下面是一个简化的例子。
感兴趣的变量被收集在一个列表中，然后像这样命名。

 
predictors <- list(df$pred1,
                   df$pred2,
                   df$pred3,
                   )

names(predictors) <- c("Hrs/day reading",
                       "Hrs/day TV",
                       "Hrs/day Computer"
                       )

然后我对我的协变量做了完全相同的事情，给我留下了另一个名为“Covariates”的命名列表
获取每个组合的系数表

covariate_models_total <- function(pred,
                                   cov){
  model <- lm(outcome ~ pred + cov, data = df)
  coefs <- summary(model)$coef
  return(coefs)
}


for (p in predictors) {
  for (c in covariates){
    results <- covariate_models_total(p,c)
    print(results)
  }
}

结果是看起来像这样的表格

                 Estimate Std. Error     t value   Pr(>|t|)
(Intercept) 54.6909179143 31.8207606  1.71871812 0.09173122
pred        -5.8995651667  3.5564502 -1.65883532 0.10328739
cov         -6.2504111266  5.1593890 -1.21146344 0.23130134

这很棒，但是有 100 多个，我需要标签才能知道我在看什么。
我尝试了 print(p) 的变体或 print(name(p)) .我试过调整函数和循环。理想情况下， pred和 cov将直接替换为表中的变量名称，但我很高兴直接在上面看到它们(就像它们在以前的输出中的显示方式)。
我觉得它应该如此简单，有人能指出我正确的方向吗？谢谢!

Answer 1

而不是 print ing，将其存储在 list 中

out <- list()
for (p in predictors) {
  for (c in covariates){
    results <- covariate_models_total(p,c)
    results <- list(results)
    names(results) <- paste0(p, "_", c)
    out <- c(out, results)
  }
}