r - 如何获得函数的导数？

Question

如何获得以下函数的导数？

g <- expression(x^2)
derivg <- D(g, 'x')
derivg
# 2 * x
g1 <- derivg(2)
# Error: could not find function "derivg"

我想找到 x = 2 处的导数。

Answer 1

derivg是调用，而不是函数。要评估它x = 2，你可以做

eval(derivg, list(x = 2))
[1] 4