Bagaimana cara memperkirakan integral berikut menggunakan simulasi MC?
Terima kasih!
Sunting (Beberapa konteks): Saya mencoba mempelajari cara menggunakan simulasi untuk memperkirakan integral, dan saya mendapatkan beberapa latihan yang dilakukan ketika saya mengalami beberapa kesulitan.
Sunting 2 + 3 : Entah bagaimana saya menjadi bingung dan berpikir saya perlu membagi integral menjadi bagian yang terpisah. Jadi, saya benar-benar menemukan jawabannya:
n <- 15000
x <- runif(n, min=-1, max=1)
y <- runif(n, min=-1, max=1)
mean(4*abs(x-y))
integrate(integrate(abs(x-y), y, -1, 1), x, -1, 1);
dan mendapatkan jawaban 8/3.
integrate(Vectorize(function(y) integrate(function(x) abs(x-y), -1, 1)$value), -1, 1)
dan mendapatkan perkiraan numerik. Menggunakan paket cubatureadaptIntegrate(function(x) abs(x[1] - x[2]), c(-1, -1), c(1, 1))
bisa digunakan. Ini hanya untuk memberikan beberapa ide untuk evaluasi numerik integral yang bisa berguna, misalnya ketika menguji apakah simulasi berfungsi dengan benar.