r - 如何“更新”在 R 中使用“glm”构建的模型

Question

在下面的可重现代码（最后一行）中，如果我将 'Income' 替换为 'fieldToRemove'，'update' 功能将不起作用。我怎样才能使这个功能工作？我需要循环运行该行。

state.x77                          
tmpData = as.data.frame(state.x77) 
colnames(tmpData)[4] = "Life.Exp"  
colnames(tmpData)[6] = "HS.Grad"
cnames = colnames(tmpData)
cnames
lenCnames = length(cnames)

rhsOfFormula = paste(cnames[1:(length(cnames)-1)],collapse= "+")
lhsOfFormula = cnames[length(cnames)]
(fmla <- as.formula(paste(lhsOfFormula , " ~ ", rhsOfFormula )) )
modelTmp <- glm(formula = fmla, data=tmpData)

fieldToRemove = 'Income'
newModel <- update(modelTmp, .~.-Income )

Answer 1

update需要一个公式作为第二个参数，因此您必须使用之前使用的相同技巧as.formula：

newModel <- update(modelTmp, as.formula(paste(".~.-", fieldToRemove)) )