我想知道我怎样才能想出一个lm公式语法使我能够使用paste和...一起cbind用于多元多元回归。

Example

在我的模型中，我有一组变量，对应于下面的原始示例：

data(mtcars)
depVars <- paste("mpg", "disp")
indepVars <- paste("qsec", "wt", "drat")

Problem

我想用我的模型创建一个模型depVars and indepVars。手写的模型看起来像这样：

modExmple <- lm(formula = cbind(mpg, disp) ~ qsec + wt + drat, data = mtcars)

我有兴趣生成相同的公式而不引用变量名称并且仅使用depVars and indepVars上面定义的向量。

尝试1

例如，我的想法对应于：

mod1 <- lm(formula = formula(paste(cbind(paste(depVars, collapse = ",")), " ~ ",
                                   indepVars)), data = mtcars)

尝试2

我也尝试过这个：

mod2 <- lm(formula = formula(cbind(depVars), paste(" ~ ",
                                                   paste(indepVars, 
                                                         collapse = " + "))),
           data = mtcars)

旁注

• 我找到了一些好例子 https://stackoverflow.com/questions/4951442/formula-with-dynamic-number-of-variables关于如何使用paste与公式，但我想知道如何结合cbind.
• 这主要是一个语法问题；在我的真实数据中，我想将许多变量引入模型中，并且使用之前生成的向量更加简洁，并使代码更加美观。实际上，我只对创建一个包含以下内容的公式对象感兴趣：cbind变量名称对应于一个向量，其余变量对应于另一向量。
• 总之，我想得出公式modExample without必须键入变量名称。

认为它有效。

data(mtcars)
depVars <- c("mpg", "disp")
indepVars <- c("qsec", "wt", "drat")

lm(formula(paste('cbind(',
                 paste(depVars, collapse = ','),
                 ') ~ ',
                 paste(indepVars, collapse = '+'))), data = mtcars)