powered by
Trapezoidal rule to approximate an integral.
integrate_trapeze(x, y)
a numerical vector, the discretization of the domain.
a numerical value, the discretization of the function to integrate.
a numerical value, the approximation.
# NOT RUN { x <- seq(0,1,le=1e2) integrate_trapeze(x,x^2) integrate_trapeze(data1$grids[[1]],t(data1$x[[1]])) # }
Run the code above in your browser using DataLab