26

对于任意函数

f <- function(x, y = 3){
  z <- x + y
  z^2
}

我希望能够采用参数名称f

> argument_names(f)
[1] "x" "y"

这可能吗?

4

1 回答 1

32

formalArgs并且formals是在这种情况下有用的两个函数。如果您只想要参数名称,那么formalArgs它将更有用,因为它只给出名称并忽略任何默认值。 formals给出一个列表作为输出,并提供参数名称作为列表中元素的名称,默认值作为元素的值。

f <- function(x, y = 3){
  z <- x + y
  z^2
}

> formalArgs(f)
[1] "x" "y"
> formals(f)
$x


$y
[1] 3

我的第一个倾向是建议formals,如果你只是想要参数的名称,你可以使用names(formals(f)). 该formalArgs函数只是为您执行此操作的包装器,因此任何一种方式都有效。

编辑:请注意,技术上的原始函数没有“形式”,因此如果在原始函数上使用此方法将返回 NULL。一种解决方法是args在传递给formalArgs. 无论功能是否原始,这都有效。

> # formalArgs will work for non-primitives but not primitives
> formalArgs(f)
[1] "x" "y"
> formalArgs(sum)
NULL
> # But wrapping the function in args first will work in either case
> formalArgs(args(f))
[1] "x" "y"
> formalArgs(args(sum))
[1] "..."   "na.rm"
于 2016-11-16T19:19:47.390 回答