?? myjacobi.m
字號:
function x=myjacobi(a,b,x0,n,e)%線性方程組的Jacobi迭代法
m=length(b);
x=x0;
for k=1:n
k
for i=1:m
x(i)=(b(i)-sum(a(i,:).*x0)+a(i,i)*x0(i))/a(i,i);
end
v=max(abs(x-x0))
if max(abs(x-x0))<e
break
end
x0=x
end
if k==n
'迭代失敗'
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -