24小时热门版块排行榜    

查看: 2592  |  回复: 5
【悬赏金币】回答本帖问题,作者dsmj1995将赠送您 10 个金币
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

dsmj1995

铜虫 (小有名气)

[求助] 请教如何提高MATLAB函数norminv(p,0,1)的使用精度

请教各位大佬一个MATLAB问题:如何提高函数norminv(p,0,1)的使用精度?
norminv为一维正态分布的累积分布函数的逆函数,假设 p = 1-10^(i) , i = 1,...,.N, 因为matlab的运算精度为双精度16位有效数字 ,因此当N>16的时候,norminv(p,0,1)返回的都是正无穷大。现在编程涉及到的p比较小,所以想请教一下如何使得p<1-10^16时,也能使得该函数得出较为准确的结果?
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dsmj1995

铜虫 (小有名气)

引用回帖:
4楼: Originally posted by dsmj1995 at 2020-09-06 14:18:34
编制的MATLBA函数 LeftTruncatedNormrnd及其验证代码如下,经过验证感觉这种方法还不错。有路过大佬或虫友如果觉得有什么不对,或者更高效的方法,还请多指教。

主函数:
function  = LeftTruncatedNormrnd(ul, ...

验证代码更正,需先保存主函数LeftTruncatedNormrnd:

ul = 2
Ns = 1e5;
% method#1
% U1 = rand(Ns,1);
% X = norminv(U1+(1-U1).*normcdf(ul));
% % % method#2
% U1 = rand(Ns,1);
% p = (U1+(1-U1).*(1-sym(normcdf(ul,'upper'))));
% X = double(norminv(p));
% % method#3
[X,accept_rate] = LeftTruncatedNormrnd(ul,Ns);

close all
xc_max = max(X);
xc = ulxc_max-ul)/1000:xc_max;
dx = xc(2)-xc(1);
n1 = hist(X,xc);

pdf_sim = n1/(Ns*accept_rate)/dx;
pdf_norm = normpdf(xc,0,1)/normcdf(ul,'upper');

plot(xc,pdf_sim)
hold on
plot(xc,pdf_norm)
legend('sim','target')
6楼2020-09-06 14:48:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

kingspin

木虫 (著名写手)


独孤神宇: 金币+1, 鼓励交流 2020-09-07 08:20:11
做数值计算的第一步就应该是把问题归一化,从而在计算质量最高的范围求解

发自小木虫IOS客户端
欢迎加入Digimat技术交流讨论群366061054,了解复合材料多尺度仿真技术
2楼2020-08-29 20:16:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dsmj1995

铜虫 (小有名气)

该问题已经解决。实际上,我本来的目的是为生成服从左截断的正态分布变量,X~N(mu,sigma,u-), 式中mu,sigma为标准正态变量的均值与方差,u-为左截断的位置。通常的的方法是生成均匀分布变量 p~U(p1,1),其中p1 = normcdf(u-,mu,sigma),然后再根据正态函数的累积分布函数将p1转化目标的截断正态分布变量X, 即是X = norminv(p1,mu,sigma)。其中normcdf,norminv都是MATLAB内置函数,分别是正态分布函数的累积分布函数与其逆函数。这种做法在u-与mu比较接近的时候,效率还是可以的。但是当u->>mu,即是p1非常接近于1,如同我在帖子中所描述的问题,由于数值计算的精度所限制这种做法是行不通的。

关于当p1非常接近于1时,对应的逆函数值的求解问题,我在链接上 https://www.mathworks.com/matlab ... ty-is-close-to-zero 看到两种解决方法:一种是在MATLAB采用符号变量sym,一种是通过迭代的方法。这里不再赘述。下面说我的问题怎么解决,相应的MATLAB代码如下:

Beta = u-;即是上面问题描述的截断的位置
% % method#1:经典方法
U1 = rand(1);
X = norminv(U1+(1-U1).*normcdf(Beta));
% % method#2: 采用matlab的sym变量
U1 = rand(1);
p = (U1+(1-U1).*(1-sym(normcdf(Beta,'upper'))));
X = double(norminv(p));
% % method#3:文献链接https://arxiv.org/pdf/0907.4010.pdf,提供了一种采用平动指数分布函数作为抽样函数的Accept-Reject模拟方法,根据此编制了MATLAB函数 LeftTruncatedNormrnd
X = LeftTruncatedNormrnd(Beta,Ns);,
3楼2020-09-06 14:14:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dsmj1995

铜虫 (小有名气)

编制的MATLBA函数 LeftTruncatedNormrnd及其验证代码如下,经过验证感觉这种方法还不错。有路过大佬或虫友如果觉得有什么不对,或者更高效的方法,还请多指教。

主函数:
function [X,accept_rate] = LeftTruncatedNormrnd(ul,Ns)

alpha = (ul+sqrt(ul^2+4))/2;
Ns_accept = 0;

while Ns_accept==0
% 1. Generate translated exponential distribution
Z = exprnd(1/alpha,Ns,1)+ul;

% 2. Compute coeffcient of accept rate
po = exp(-(Z-alpha).^2/2);

% 3. Accept or reject
U = rand(Ns,1);
index = find(U<=po);
X = Z(index,1);

% 4. other
Ns_accept = length(index);
accept_rate = Ns_accept/Ns;
end

return

验证代码:
xc_max = max(X);
xc = ulxc_max-ul)/1000:xc_max;
dx = xc(2)-xc(1);
n1 = hist(X,xc);

pdf_sim = n1/Ns_accept/dx;
pdf_norm = normpdf(xc,0,1)/normcdf(ul,'upper');

plot(xc,pdf_sim)
hold on
plot(xc,pdf_norm)
4楼2020-09-06 14:18:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
不应助 确定回帖应助 (注意:应助才可能被奖励,但不允许灌水,必须填写15个字符以上)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 328求调剂,英语六级551,有科研经历 +3 生物工程调剂 2026-03-16 4/200 2026-03-16 20:13 by Wangjingyue
[基金申请] 今年的国基金是打分制吗? 50+3 zhanghaozhu 2026-03-14 3/150 2026-03-16 17:07 by 北京莱茵润色
[考研] 0703化学调剂 ,六级已过,有科研经历 +7 曦熙兮 2026-03-15 7/350 2026-03-16 16:34 by houyaoxu
[考研] 085600材料与化工 求调剂 +13 enenenhui 2026-03-13 14/700 2026-03-16 15:19 by 了了了了。。
[考研] 277材料科学与工程080500求调剂 +3 自由煎饼果子 2026-03-16 3/150 2026-03-16 14:10 by 运气yunqi
[考研] 326求调剂 +4 上岸的小葡 2026-03-15 5/250 2026-03-16 08:39 by Linda Hu
[基金申请] NSFC申报书里申请人简历中代表性论著还需要在申报书最后的附件里面再上传一遍吗 20+5 NSFC2026我来了 2026-03-10 14/700 2026-03-15 23:53 by 不负韶华的虎
[考研] 材料工程专硕274一志愿211求调剂 +5 薛云鹏 2026-03-15 5/250 2026-03-15 20:38 by Logic2024
[考研] 调剂 +3 13853210211 2026-03-10 3/150 2026-03-14 00:47 by JourneyLucky
[考研] 271求调剂 +10 生如夏花… 2026-03-11 10/500 2026-03-14 00:35 by 卖报员小雨
[考研] 327求调剂 +4 Ffff03 2026-03-10 4/200 2026-03-14 00:17 by JourneyLucky
[考研] 材料与化工(0856)304求B区调剂 +6 邱gl 2026-03-12 7/350 2026-03-13 23:24 by 邱gl
[考研] 333求调剂 +3 球球古力 2026-03-11 3/150 2026-03-13 21:27 by JourneyLucky
[考研] 材料与化工085600调剂求老师收留 +9 jiaanl 2026-03-11 9/450 2026-03-13 20:22 by JourneyLucky
[考研] 328化工专硕求调剂 +4 。,。,。,。i 2026-03-12 4/200 2026-03-13 14:44 by JourneyLucky
[考研] 0817化学工程与技术考研312分调剂 +3 T123 tt 2026-03-12 3/150 2026-03-13 10:49 by houyaoxu
[考研] 333求调剂 +3 152697 2026-03-12 4/200 2026-03-13 07:08 by Iveryant
[考研] 085600 材料与化工 295 求调剂 +10 dream…… 2026-03-10 12/600 2026-03-12 13:46 by dream……
[考研] 290求调剂 +3 柯淮然 2026-03-10 8/400 2026-03-11 13:48 by 柯淮然
[考研] 求调剂材料专硕293 +6 段_(:з」∠)_ 2026-03-10 6/300 2026-03-10 18:22 by ms629
信息提示
请填处理意见