4

我正在尝试使用uniroot()但在此之前我必须区分一个表达式来解决一个方程。

我创建了表达式,然后将其区分,D()但我不知道如何将所述表达式返回到我可以作为其根源的函数。

到目前为止,我有:

eq<-expression((w^2)*3+((1-w)^2)*2.5+2*w*(1-w)*0.9)
f<-D(eq, name="w")

预先感谢您的帮助!

4

1 回答 1

4

试试这个(感谢 flodel 的有用评论):

g = function(w) eval(f)
uniroot(g, c(0,1000))
于 2012-10-06T10:25:37.553 回答