上传者: diablobit
|
上传时间:2024/4/14 10:26:36
|
文件大小:304B
|
文件类型:m
共轭梯度法matlab程序
共轭梯度法matlab程序functionx=cg(A,b)tol=1e-10;r=b+A*b;w=-r;z=A*w;s=w'*z;t=(r'*w)/s;x=-b+t*w;fork=1:numel(b);r=r-t*z;if(norm(r)<tol)return;endB=(r'*z)/s;w=-r+B*w;z=A*w;s=w'*z;t=(r'*w)/s;x=x+t*w;end
本软件ID:1206777