Question

I need a working MATLAB CODE for GAUSS SEIDEL ITERATIVE SCHEME
the matlab code must compare with actual value and break

if this condition is not met i will dislike

think before answering

a correct working matlab code must be given

or else i will dislike badly

Answer 1

clc;clear all
a=[9 -2 3 2;2 8 -2 3;-3 2 11 -4;-2 3 2 10]; %%Sample matrix A
b=[54.5;-14;12.5;-21]; %%RHS vector
ans1=GaussSeidelm(a,b) %%Function call
function X=GaussSeidelm(A,B) %%Function implementing GS method
[r c]=size(A); %%Finds dimension
X(1:r,1)=0; %%Initialises to 0
k=1;
act=A\B; %%Actual solution
while(true) %%GS method starts till the time loop is true
for(i=1:r)
sum=0;
for(j=1:c)
if(i==j)
continue
end
sum=sum+A(i,j)*X(j,1); %%Sums all elements
end
X(i,1)=(B(i)-sum)/A(i,i);
end
if(act-X<=0.0001)
break %breaks if error is less
end
end
end

- - 5 6 - 7- 00 9- 10 - 11 12 13 - clc;clear all a=[9 -2 3 2;2 8 -2 3; -3 2 11 -4;-2 32 10]; %% Sample matrix A b=[54.5; -14;12.5;-21; RHS vector ans1=GaussSeidelm(a,b) Function call function X=GaussSeidelm (A,B) Function implementing GS method [r c]=size (A); %%Finds dimension X(1:r,1)=0; %%Initialises to o k=1; act=A\B; Actual solution while(true) %%GS method starts till the time loop is true for(i=1:r) sum=0; for(j=1:0) if(i==j) continue end sum=sum+A(i,j)*(], 1); %% Sums all elements end X(i,1)=(B(i)-sum) /A(i, i); end if(act-x<=0.0001) break &breaks if error is less end end end 로 14 15 - 16 - 17 - - 18 19- 20 21 22 - ليا N 24 25

ans1 5.0001 -2.0000 2.5000 -1.0000 fx >>