Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function V = spectralradiusJacobi(a,b,step,o)
- % Funksjonen skriver spektralradiusene til en matrise V av
- % iterasjonsmatrisene i Jacobi metoden
- format long
- c = a:step:b;
- d = length(c);
- V = zeros(d,1);
- for i = 1:d
- A = sparse(MatrixGenerator(c(i),o));
- I = eye(c(i)^2,c(i)^2);
- D = diag(diag(A));
- V(i,1) = max(abs(eig(I-D\A)));
- end % for
- end % function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement