powered by
trapz(y, dt)
x <- rnorm(100) trapz(x, 0.01)
Run the code above in your browser using DataLab