constant <- function(x){1}

 integrate(constant,lower=1,upper=10)

这可能不仅仅是简单得可笑,但有什么理由说明为什么这不起作用?

我应该以不同的方式为常量编写函数吗?

最佳答案

您可以使用 Vectorize 函数将非矢量化函数转换为 integrate 所需的函数类型:

> constant <- function(x){1}
> Vconst <- Vectorize(constant)
>  integrate(Vconst,lower=1,upper=10)
9 with absolute error < 1e-13

关于r - 简单集成,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/12101301/

10-12 13:56