我如何获得函数的衍生物?

ese*_*mef 6 r derivative differentiation

如何获得以下功能的衍生物?

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

我想在x = 2处找到导数.

Ric*_*ven 11

derivg是一个电话,而不是一个功能.要评估它x = 2,你可以做到

eval(derivg, list(x = 2))
[1] 4
Run Code Online (Sandbox Code Playgroud)