R中导数deriv若使用自定义函数function如何实现求导？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

比如有：
myfun <- function(x){
    2*x^2
}

deriv(expression(myfun), "x")却得不到求导的结果。如何处理？

我给的只是一个简单的自定义函数，所以可以使用
deriv(expression(2*x^2), "x")解决。但是实际使用中myfun自动的较为复杂，因此不适合直接在deriv中直接写，而需要先根据上边的方式自定义。我的第一问题就是在自定函数，如何求其导数？


还有一个问题是关于二阶偏导数的，如果一个自定义函数中存在x1和x2两个自变量，R中分别求其偏导数可以使用
deriv(expr, c("x1", "x2"))来解决，但是如果我想先求出x1的偏导数，然后在其基础上进一步对x2再求导数，R中如何做到？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：function 自定义函数 如何实现 Fun UNC function 如何

这种还是用mathematica吧

qoiqpwqr 发表于 2017-3-14 19:27
这种还是用mathematica吧

谢谢群主的建议。我使用R比较多，Mathematica数据录入格式比较麻烦，且非线性拟合的功能较差，特别是对初值要求比较繁琐。而R则可以利用optim等函数来解决。

我问的第二个问题已经得到解决了，使用deriv3函数即可，主要是写入c("p1", "p2", "p2")即可。但是还没有解决使用function函数后自定义的的办法。

请问第一个问题解决了吗 我现在也遇到了相同的问题不知如何解决

同问：deriv(expr, c("x1", "x2"))来解决，但是如果我想先求出x1的偏导数，然后在其基础上进一步对x2再求导数，R中如何做到？

请问第一个问题解决了吗 我现在也遇到同样的问题了 如回复将不胜感激