测试一个功能是否使用另一个功能

Question

是否可以确定一个函数是否调用另一个函数？例如，我想知道用户创建的函数（例如f()）是否使用了函数（例如sum()）。

f <- function(x, y) {
  sum(x, y)
}

# test_if_f_uses_sum(f)

^{由reprex package（v0.3.0）于2019-06-11创建}