r - 如何替换语言对象中的符号？

Question

假设我有以下语言对象:

lang <- quote( f(x=a) )

我想用 1 代替为 a .我怎样才能做到这一点？

我希望 substitute做我想做的事，但是

substitute(lang, list(a=1))

刚刚返回 lang ， 尽管

substitute(f(x=a), list(a=1))

事实上确实符合我的预期。

Answer 1

使用 do.call :

do.call(substitute, list(lang, list(a=1)))

通过使用 do.call ，我们强制评估名称 `lang`到其实际基础值(value)， f(x=a) .然后在 f(x=a) 上执行替换, 而不是名称 `lang` .