木辰月生 发表于 2010-9-7 21:24

Gauss顺序消去法

%M函数gauss.m
function x=gauss(a,b)
=size(b);
if size(a)==
for i=1:(n-1)
if a(i,i)==0,error('Divide by zero');end
b((i+1):n,:)=b((i+1):n,:)-a((i+1):n,i)*b(i,:)/a(i,i);
a((i+1):n,i:n)=a((i+1):n,i:n)-...
a((i+1):n,i)*a(i,i:n)/a(i,i);
end
if a(n,n)==0,error('Divide by zero');end
x(n,:)=b(n,:)/a(n,n);
for i=n-1:-1:1
x(i,:)=(b(i,:)-a(i,(i+1):n)*x((i+1):n,:))/a(i,i);
end
else,error('Dimension of matrix must agree'),end
计算方法中的有关Gauss消去法的M文件程序代码

阳台7777 发表于 2010-9-7 21:42

帮你顶顶，暂时看不懂···

Agnes2_3_4_5_6 发表于 2010-9-7 21:49

不错，帮顶！！~

sunying52zs 发表于 2010-9-7 21:57

是不是很有用的 我看不懂啊~~

wangyslyh 发表于 2010-9-7 22:04

帮你顶顶，暂时看不懂···

zjlsmrl 发表于 2010-9-7 22:39

能不能给解释一下呢？看不懂耶。。

yjh2010 发表于 2010-9-7 23:21

到底应用在哪方面啊

yamarychen 发表于 2010-9-7 23:39

回复 木辰月生 的帖子

顶啊顶~~

   

meseeme 发表于 2010-9-8 08:00

楼主那种裂纸欲出的大手笔，竟使我忍不住一次次的翻开楼主的帖子……   

pcm 发表于 2010-9-8 12:00

留个脚印```````
页: [1] 2 3 4 5
查看完整版本: Gauss顺序消去法