bug su power method, aggiunto calcolo autovalori con matrici simili

This commit is contained in:
2014-12-16 19:36:03 +01:00
parent 6e14720cdb
commit 436bc12ec0
3 changed files with 20 additions and 5 deletions

View File

@@ -1,22 +1,22 @@
function [v,a] = power_method (U,toll)
function [vn,a] = power_method (U,toll)
[x,~] = size(U);
for i=1:x
v(i)=1;
end
v=v';
vn=v;
err = inf;
while err > toll
v1=U*v;
v1=v1./norm(v1,inf);
err = norm(v1-v,inf);
v1n=v1./norm(v1,inf);
err = norm(v1n-vn,inf);
a = v1./v;
v=v1;
vn=v1n;
end