r - 列出函数中的函数

Question

这个问题已经有答案了:

Finding out which functions are called within a given function [duplicate] (3 个回答)

已关闭 7 年前。

R 中有没有办法列出给定函数中包含的函数？

例如下面的代码:

myFun <- function(x) { 
  res <- list(m1=mean(x), s1=sd(x), mi=min(x))
  return(res)
}

如何从函数 myFun 中提取所使用函数的名称。在本例中，我想要一个带有平均值、标准差和最小值的向量。

我想在不必调用该函数的情况下执行此操作(否则 Rprof() 会完成这项工作)。

Answer 1

安装pryr通过 devtools 和 github:

require(devtools)
install_github("hadley/pryr")

然后简单地走进魔多:

fun_calls(myFun)
[1] "{"      "<-"     "list"   "mean"   "sd"     "min"    "return"

请注意，函数的数量比您预期的要多，因为 R 中的很多函数都是函数。请随意应用额外的逻辑来删除您不感兴趣的常见内容，例如 {和<- (当您使用 = 进行分配时得到)和 [ (如果你曾经子集，你就会得到)。