标题:求助 M 文件编写错误
只看楼主
hebutyll
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-7-29
 问题点数:0 回复次数:0 
求助 M 文件编写错误
这是我编写的M文件,但是不知道哪里错了,还请帮助!
%jacobi.m
function s=jacobi (A, b, X0, eps)
if nargin==3
    eps=1.0e-6
elseif nargin<3
    error
    return
end
% 求对角阵D和
D=diag(diag(A));
D=inv(D);
L=tril(A, -1);
U=triu(A, 1);
B=-D*(L+U);
f=D*b;
%进行迭代求解
while norm (s-X0) >=eps
    X0=s;
    s=B*X0+f;
end
return
当在 matlab中输入
a=[10 -1 2;2 5 -1;-1 2 5];
b=[5 10 15];
x0=[0 0 0];
eps=0.0001;
s=jacobi(a, b, x0, eps)
就会出现错误提示。
搜索更多相关主题的帖子: eps 文件 编写 jacobi nargin 
2008-07-29 11:26



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-225674-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013335 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved