用粘贴写出公式

【问题标题】：write out formula with paste用粘贴写出公式
【发布时间】：2015-01-11 17:53:00
【问题描述】：

有一个向量（称为f）

f
3 4 8

它指示数据框 (y) 中的哪些列应包含在模型中。这些列的列名是 FER7、TOJ9、GHY11。有人可以告诉我如何实现这一目标

response~factor(FER7)+factor(TOJ9)+factor(GHY111)

使用粘贴或类似的东西。然后，我只需要将其设为 as.formula 并将其提供给函数。有办法，只是暂时看不到

【问题讨论】：

标签： r formula paste

【解决方案1】：

你可以试试

 as.formula(paste0('response~', paste('factor',
              '(', names(y)[f],')', sep="",collapse="+")))
 #response ~ factor(FER7) + factor(TOJ9) + factor(GHY111)

数据

f <- c(3,4,8)
set.seed(24)
y <- as.data.frame(matrix(sample(1:100, 9*10, replace=TRUE), ncol=9) )
colnames(y) <- c('response', 'T1', 'FER7', 'TOJ9', 'TOJ10',
                  'TOJ11', 'TOJ12', 'GHY111', 'GHY12')

【讨论】：