Punto4

A = [10 -2;-3 12];
b = [8 9]';
lambda = 1.2;
[x, ea, iter] = GaussSeidelR(A,b,lambda,0.0001,50)

 iter  =

   11.

 ea  =

   0.0000139
   0.0000117

 x  =

   1.
   1.

A = [0.8 -0.4 0; -0.4 0.8 -0.4; 0 -0.4 0.8];
b = [41 25 105]';
lambda = 1.2;
[x, ea, iter] = GaussSeidelR(A,b,lambda,0.0001,50)

 iter  =

   11.

 ea  =

   0.0000169
   0.0000091
   0.0000098

 x  =

   173.74998
   244.99998
   253.74999