【matlab】 冪法 求解最大特征值

一. 算法：

1.輸入矩陣A，初始向量x誤差限ep,最大迭代次數N

2.置 k = 1, m1 = 0;

3.求Xr-> norm(x)   abs(Xr)=max[Xi] 1<=i<=n

4.計算    y = x/norm(u)

5. 若m1-m 小於誤差限 輸出結果，停止 否則 to6

6.若k<N k++ norm(x) = m1

二.程序：

A = [-6.9,14,0;
     -5,10.1,0;
     -1,0,-0.1];
N=100;
ep=1e-4;
n=length(A);
y=ones(n,1);
k=0;
m1=0;
while k<=N
   x=A*y;
   m=max(abs(x));
   y=x/m
   if abs(m-m1)<ep
        break;
   end          
   m1=m;
   k=k+1;
end

final_answer_u = m;
final_answer_x = x;