使用蒙特卡洛积分法计算多重积分,采用MATLAB编程

蒙特卡洛求解积分时,与积分重数无关,下面是蒙特卡洛期望法:

S = \int_{a}^{b}f(x)dx\approx (b -a)\frac{1}{N}\sum_{i = 0}^{N-1}f(X_i)

例子:所需求解积分

\begin{array}{r}{\int_{1}^{2}\left(\int_{x_{1}x_{2}}^{3x_{1}}\left(\int_{x_{1}x_{2}}^{2x_{1}x_{2}}\left(\int_{x_{1}x_{2}}^{x_{1}+2x_{1}x_{3}}\left({\sqrt{x_{1}x_{2}}}\ln x_{3}+\sin\left({\frac{x_{4}}{x_{2}}}\right)\right)d x_{4}\right)d x_{3}\right)dx_{2}\right)dx_{1}}\end{array}

clc;clear all;close all;
fh3 = @(x)sqrt(x(:,1).*x(:,2)) .* log(x(:,3)) + sin(x(:,4)./x(:,2));
n = 1e8;%采样个数
m = 1/n;

%生成采样点
x(:,1) = unifrnd(1,2,1,n);
x(:,2) = unifrnd(1,6,1,n);
x(:,3) = unifrnd(1,24,1,n);
x(:,4) = unifrnd(2,98,1,n);

ind3 = x(:,2) >= x(:,1) & x(:,2) <= 3*x(:,1) &...
    x(:,3) >= x(:,1).*x(:,2) & x(:,3) <= 2*x(:,1).*x(:,2)&...
    x(:,4) >= (x(:,1) + x(:,1).*x(:,3)) & x(:,4) <= (x(:,1) + 2*x(:,1).*x(:,3));%索引
fh3sum = fh3(x(ind3,:));
i3 = (2-1)*(6-1)*(24-1)*(98-2)*m*sum(fh3sum)

  • 1
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 1
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值