MATLAB列主元消去法function x = gauss(A,b) int AB=[A,b]; n=length(b);RA=rank(A);RB=rank(B);d=RB-RA;if d>0disp('此方程组无解')endif RA==RB&RA~=ndisp('此方程组有无穷解')endif RA==RB&RA==ndisp('此方程组有唯一解')[n,n]=size(A);

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/04 20:34:59
MATLAB列主元消去法function x = gauss(A,b) int AB=[A,b]; n=length(b);RA=rank(A);RB=rank(B);d=RB-RA;if d>0disp('此方程组无解')endif RA==RB&RA~=ndisp('此方程组有无穷解')endif RA==RB&RA==ndisp('此方程组有唯一解')[n,n]=size(A);

MATLAB列主元消去法function x = gauss(A,b) int AB=[A,b]; n=length(b);RA=rank(A);RB=rank(B);d=RB-RA;if d>0disp('此方程组无解')endif RA==RB&RA~=ndisp('此方程组有无穷解')endif RA==RB&RA==ndisp('此方程组有唯一解')[n,n]=size(A);
MATLAB列主元消去法
function x = gauss(A,b)
int A
B=[A,b];
n=length(b);
RA=rank(A);
RB=rank(B);
d=RB-RA;
if d>0
disp('此方程组无解')
end
if RA==RB&RA~=n
disp('此方程组有无穷解')
end
if RA==RB&RA==n
disp('此方程组有唯一解')
[n,n]=size(A);
x=zeros(n,1);
for k = 1:n-1
[piv,r] = max(abs(B(k:n,k))); %找列主元所在子矩阵的行r
r = r + k - 1; % 列主元所在大矩阵的行 ,
if r>k
temp=B(k,:);
B(k,:)=B(r,:);
B(r,:)=temp;
end
end
if B(k,k)==0,error('对角元出现0'),end
% 把增广矩阵消元成为上三角
for p = k+1:n
B(p,:)=B(p,:)-B(k,:)*B(p,k)/B(k,k);
end
end
% 解上三角方程组
A =B(:,1:n); b = B(:,n+1);
x(n) = b(n)/A(n,n);
for k = n-1:-1:1
x(k)=b(k);
for p=n:-1:k+1
x(k) = x(k)-A(k,p)*x(p);
end
x(k)=x(k)/A(k,k);
end
运行
A=[0.729,0.8100,0.9000;1.000,1.000,1.000;1.331,1.210,1.100];
b=[0.6867;0.8338;1.000];
guass(A,b)
它的答案应该是
x=
0.2246
0.2812
0.3280

MATLAB列主元消去法function x = gauss(A,b) int AB=[A,b]; n=length(b);RA=rank(A);RB=rank(B);d=RB-RA;if d>0disp('此方程组无解')endif RA==RB&RA~=ndisp('此方程组有无穷解')endif RA==RB&RA==ndisp('此方程组有唯一解')[n,n]=size(A);
问题出在点除上(3处),如
B(p,:)=B(p,:)-B(k,:)*B(p,k)/B(k,k); 应为 B(p,:)=B(p,:)-B(k,:)*B(p,k)./B(k,k)
x(n) = b(n)/A(n,n); 应为 x(n) = b(n)./A(n,n);
x(k)=x(k)/A(k,k); 应为 x(k)=x(k)./A(k,k);
>> A=[0.729,0.8100,0.9000;1.000,1.000,1.000;1.331,1.210,1.100];
>>b=[0.6867;0.8338;1.000];
>>gauss(A,b)
ans =
A^2/2
此方程组有唯一解
x =
0.2245
0.2814
0.3279

MATLAB实现高斯列主元消去法的问题把问号改了之后,在MATLAB中实现高斯列主元消去法解线性方程组function x = gauss(A,b)[n,n] = size(A);x = zeros(n,1);Aug = [A,b]; % 增广矩阵for k = 1:n-1[piv,r] = max(abs(Aug(k:n,k)) MATLAB用高斯消去法解非线性方程组的代码 MATLAB列主元消去法function x = gauss(A,b) int AB=[A,b]; n=length(b);RA=rank(A);RB=rank(B);d=RB-RA;if d>0disp('此方程组无解')endif RA==RB&RA~=ndisp('此方程组有无穷解')endif RA==RB&RA==ndisp('此方程组有唯一解')[n,n]=size(A); 求matlab高手指导,建立函数的问题高斯消去法函数function m=gauss(a,b)n=length(b);for k=1:n-1for i=k+1:n if a(i,k)>a(i,i)maxj=a(i,k); %选则列主元,放在maxj里a(i,k)=a(i,i); a(i,i)=maxj;end mult=a(i,k)/a(k,k); %求出消去系数f 找列主元高斯消去法来求解线性代数方程组解的matlab程序 用列主元高斯消去法解方程组Ax=b,解释矩阵三角分解法与列主元高斯消去法的异同用matbal 实现编个程序 用MATLAB实现 function 在matlab中怎么定义矩阵 matlab中,built in function是什么意思? matlab两个矩阵相除原理是什么?如题,matlab里面两个矩阵直接相除时使用的是什么代数运算法则,是高斯消去法?雅克比迭代法或者三角消去法? matlab用列主元高斯消去法解方程组,matlab用列主元高斯消去法解方程组 写出理论知识、设计思路、算法步骤(或流程图);写出程序清单(加上必要的注释);写出程序运行操作过程与输 什么是消去法 什么是高斯主元消去法 用消去法解题 MATLAB中函数function是怎么用的? function 英语翻译一、高斯消去法的程序:function [A,b]= Gauss(A,b);%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%use Gaussian elimination method to change 'A' into upper triangular matrix% Nov 26,2008%%%%%%%%%%%%%%% 高斯列主元消去法与高斯乔丹消去法的区别 用消去法解题,谢谢!