Advertisement
Guest User

Untitled

a guest
Jun 23rd, 2017
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.75 KB | None | 0 0
  1. function A=GenA(n)
  2. %L=round(rand(n,n)*10-5);
  3. %U=round(rand(n,n)*10-5);
  4. L=rand(n,n)*100-50;
  5. U=rand(n,n)*100-50;
  6. for i=1:n
  7. for j=1:(i-1)
  8. L(i,j)=0;
  9. end
  10. for j=(i+1):n
  11. U(i,j)=0;
  12. end
  13. while U(i,i)==0
  14. U(i,i)=round(rand(1)*10-5);
  15. end
  16. L(i,i)=1;
  17. end
  18. A=L*U;
  19.  
  20.  
  21. function x=Gauss(A,b)
  22. n=length(A);
  23. A
  24. for j=1:n
  25. for i=(j+1):n
  26. if A(i,j)~=0
  27. b(i,1)=b(i,1)-b(j,1)*A(i,j)/A(j,j);
  28. A(i,1:n)=A(i,1:n)-A(j,1:n)*A(i,j)/A(j,j);
  29. end
  30. end
  31. end
  32. b;
  33. U=A
  34. for i=n:-1:1
  35. for j=(i+1):n
  36. b(i,1)=b(i,1)-x(j,1)*U(i,j);
  37. end
  38. x(i,1)=b(i,1)/U(i,i);
  39. end
  40.  
  41.  
  42. n=30;
  43. A=GenA(n);
  44. x=rand(n,1)*10;
  45. b=A*x;
  46. x2=Gauss(A,b)
  47. x
  48. x2-x
  49. norm=((x2-x)'*(x2-x))^(1/2)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement