r - 如何从调用对象中获取函数对象

Question

我正在尝试从调用对象中检索函数对象在这个例子中

ff = function(x) {gg(x)}     
gg = function(y) {uu(y)}     
uu = function(z) {browser()} 
ff(1)                        

假设我想从 sys.calls()[[1]] 获取函数 ff 我得到了以下内容，但我想要 ff code> 函数对象，如何获取

Browse[1]> deparse(sys.calls()[[1]][1])
[1] "ff()"                             

Answer 1

您可以通过将调用转换为列表并对其第一个成员(即符号 ff)进行子集化来提取符号。然后，您可以eval这个符号来显示函数体(或使用它来构建新的调用)

Browse[1]> eval(as.list(sys.calls()[[1]])[[1]])
#> function(x) {gg(x)}