| 查看: 1089 | 回复: 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 @大圣 |
» 猜你喜欢
请问共同通讯和共同一作的认可度问题
已经有4人回复
286分调剂
已经有22人回复
材料调剂
已经有4人回复
085600 295分求调剂
已经有19人回复
材料调剂
已经有4人回复
302求调剂一志愿华中师范大学
已经有3人回复
环境285分,过六级,求调剂
已经有5人回复
08工科求调剂290分
已经有8人回复
321求调剂 一志愿 浙江工业大学生物医药
已经有4人回复
266分,一志愿电气工程,本科材料,求材料专业调剂
已经有4人回复














回复此楼