| 查看: 625 | 回复: 0 | ||
[求助]
相面法遇到的一个问题
|
|
请问大神，响应面法的一个小算例出现下面的错误是因为哪方面？本人菜鸟，一直没有查出来，谢谢。 错误使用 * 内部矩阵维度必须一致。 clear;clc; muX=[20;14];sigmaX=[4;1.4]; aev=sqrt(6)*sigmaX(2)/pi; uev=-psi(1)*aev-muX(2); x=muX;normX=eps; n=length(muX);f=3; d=diag(f*sigmaX); gM=x(1)-x(2); while abs(norm(x)-normX)/normX>1e-6 normX=norm(x); a1=x'; a2=a1.*a1; a3=repmat(a1,n,1); a3=a3-d; a4=a3.*a3; a5=a3+2*d; a6=a5.*a5; a=[ones(2*n+1,1),[a1,a2;a3,a4;a5,a6]]; gv=a(:,2)-a(:,3); lambda=a\gv; x=muX;normX1=eps; while abs(norm(x)-normX1)/normX1>1e-6 normX1=norm(x); g=lambda'*[1;x;x.*x]; gX=lambda(2:n+1)+2*lambda(n+2:2*n+1).*x; cdfX=1-evcdf(-x(2),uev,aev); pdfX=evpdf(-x(2),uev,aev); nc=norminv(cdfX); sigmaX1(2)=normpdf(nc)./pdfX; muX1(2)=x(2)-nc*sigmaX1(2); gs=gX.*sigmaX1;alphaX=-gs/norm(gs); bbeta=(g+gX'*(muX1-x))/norm(gs); x=muX1+bbeta*sigmaX1.*alphaX; end g=x(1)-x(2); x=muX+gM/(gM-g)*(x-muX); end |
回复此楼» 猜你喜欢
生命口C13面上会评时间
已经有11人回复
-
内心匮乏
已经有16人回复
-
生命口面上会评结束了吗大家有知道结果吗？现在还没有结果正常不？
已经有9人回复
-
有机物中金属离子降到1ppm以下，有什么好的方法吗？用过有机溶剂重结晶还是降不下来
已经有4人回复
-
投英文期刊如何查重
已经有6人回复
-
不要再数国自然申请书的 filecode 的分隔符个数了
已经有21人回复
-
伯胺上甲基求助
已经有7人回复
-
跨出版社商投稿
已经有5人回复
-
5个%2F，非固定段22个字母
已经有7人回复
-
生生命学部会评
已经有4人回复