从具有点的公式的RHS中删除变量

Question

我有一个数据框和一个存储在变量中的公式：

> d <- data.frame(cls=1, foo=2, bar=3)
> f <- formula(cls ~ .)

我想以编程方式从此公式的RHS中删除一个变量（在我的代码中，此变量的名称将作为字符串传递到某处）。我尝试使用update.formula：

> update(f, .~.-foo)    
Error in terms.formula(tmp, simplify = TRUE) : 
  '.' in formula and no 'data' argument

然后我尝试提供data参数：

> update(f, .~.-foo, data=d)
Error in terms.formula(tmp, simplify = TRUE) : 
  '.' in formula and no 'data' argument

我知道如果初始公式在右侧没有点，上述内容将起作用：

> f <- formula(cls ~ foo + bar)
> update(f, .~.-foo)
cls ~ bar

如果我无法确保RHS不包含点，如何从公式的RHS中删除变量？

Answer 1

update(terms(f, data = d), . ~ . - foo)
# cls ~ bar