r - R中特殊函数的导数

Question

我有以下公式：

哪里T是转置，我想计算上述函数关于 x 的一阶导数。我怎样才能在 R 中做到这一点？

        x = c(1, 2)
        y = cbind(y1, y2)
        y1 = runif(n = 100, -2, 2)
        y2 = rbinom(n = 100, 1, 0.5)

最后我需要四个值，它们是关于 x 的导数。

Answer 1

有一个包numDeriv来计算数值导数。所以你会这样做：

library("numDeriv")
lapply(x, function(z) grad(f, z))

计算它是什么T？如果T是一个常数，你可以解析计算导数，结果是

并直接计算。