Интеграл имеет форму \int_O^1 \int_0^{x[2]} f dx[1] dx[2]
Область интегрирования - это треугольник (сделай картинку!) С вершинами (0,0), (0,1), (1,1). Для такого домена используйте пакет SimplicialCubature
.
> f <- function(x) x[1]*x[2]
> S <- cbind(c(0,0),c(0,1),c(1,1)) # the triangle (simplex)
> library(SimplicialCubature)
> adaptIntegrateSimplex(f, S)
$integral
[1] 0.125
$estAbsError
[1] 1.25e-13
$functionEvaluations
[1] 32