0

我想计算二次方程的不同 y 值的根。但是当我运行以下代码时出现我不明白的错误。如果 y 只是一个数值，而不是向量 c(0.6,0.4,0.9)，它可以工作。我错误地使用 sapply 还是将变量传递给错误的函数？

# Paramters for quadratic poly
a<-0.875
b<-0.3779
c<-0.098
y<- c(0.6,0.4,0.9)

# quadratic function
fun<-function(x) c-y+b*x+a*x^2

# Finding root in specific interval function
root<- function (x) uniroot(fun,c(0,2))$root

# Finding roots for a list of y values
res<-sapply(y,root)
4

1 回答 1

2

例如，您可以这样做：

 sapply(y,function(y) uniroot(fun,c(0,2),y=y,c=c,a=a,b=b))
于 2013-04-18T15:02:31.803 回答