回归循环：几个dep变量和几个indep变量，其中一个indep变量根据dep变量取不同的值

Question

我有几个因变量（我们称之为dep1，dep2和dep3），我想回归几个独立变量在他们。我有独立变量a，b和c，我总是希望将其包含在回归中。但是，自变量d1，d2，d3应该只在数字与因变量的数目匹配时使用。这是：

lm(dep1 ~ a + b + c + d1) 
lm(dep2 ~ a + b + c + d2) 
lm(dep3 ~ a + b + c + d3) 

更准确地说，我的依赖变量和自变量都是月度时间序列（xts对象）。我合并了因变量以得到矩阵“dep”。 a，b，c，d1，d2和d3存储在矩阵“indep”中。

是否有可能创建一个自动执行此操作的循环？

Answer 1

我们可以使用paste

v1 <- paste0("dep", 1:3) 
v2 <- paste0("d", 1:3) 
v3 <- paste(v1, paste(paste(letters[1:3], collapse=" + "), v2, sep=" + "), sep="~") 
lapply(v3, function(x) lm(x))