錯誤的整合：功能評價給了錯誤的長度

Question

的結果，嘗試下面的代碼：

library(pracma) 

f <- function(x) 1 

integrate(f,0,1)$value 
quad(f,0,1) 

四（）正常工作，但集成（）報告錯誤消息：

錯誤集成（F，0,1）的功能 評價給出了錯誤長度的結果

什麼是錯的這個集成（）應用程序？提前致謝！

Answer 1

可以嘗試：

integrate(Vectorize(f),0,1)$value 

看到的integrate手冊：F應的R函數採取一個數字的第一個參數和返回相同長度的數值向量。 Vectorize將使f成爲一個返回與輸入相同長度輸出的函數。

Answer 2

解決方案的另一個例證：

integrate(function(x) rep(1, length(x)), 0, 1)