R：我怎样才能从字面上得到论据？

Question

假设我有一个函数f：

f <- function() 1

我想知道是否可以定义函数g以便g(f(1))输出"f(1)"，这意味着它在查找{{1}的定义之前将字符串返回字符串在环境中。

Answer 1

尝试：

foo <- function(x) deparse(substitute(x))
f <- function() {1}
> foo(f(1))
[1] "f(1)"