r - 将对象向量作为预测变量放置在 model.matrix 中

Question

我有以下向量，其中每个字符代表一个数字数据框

PreVar<-unique(c(list.ABC))

PreVar

[1] "Dxg"    "Dxu8"   "Dxu10"  "Cont2"  "Cont3"  "Cont41" "Cont42" "Cont44" "Cont52"  
"Cont62"

我想将 10 个 PreVar 对象(不带引号)放在下面的表达式中，它们之间用 + 号作为下面 model.matrix 的预测变量。

X <- model.matrix(z[2:length(z)] ~        )[,-1]  

除了手动输入之外，还有其他方法吗？

Answer 1

这里的关键是使用 ?paste和 ?as.formula 。考虑:

PreVar <- c("Dxg", "Dxu8", "Dxu10", "Cont2", "Cont3", "Cont41", "Cont42", 
            "Cont44", "Cont52", "Cont62")
pastevar <- paste(c("z[2:length(z)] ~", paste(PreVar, collapse=" + ")))
as.formula(pastevar)
z[2:length(z)] ~ Dxg + Dxu8 + Dxu10 + Cont2 + Cont3 + Cont41 + 
    Cont42 + Cont44 + Cont52 + Cont62