用matlab求矩阵最大特征值和特征向量（转）

%输出格式  
format short;  
%输入待求的矩阵A  
A=[1 2 4 5 1/2;1/2 1 3 4 1/3;1/4 1/3 1 1/2 1/6;1/5 1/4 2 1 1/7;2 3 6 7 1];  
 
[v,d]=eigs(A);  
%最大特征值  
tbmax=max(d(:));    
%得到行数和列数  
[m,n]=size(v);  
 
%将特征向量标准化  
sum = 0;  
for i=1:m  
    sum = sum + v(i,1);  
end  
tbvector = v(:,1);  
for i=1:m  
    tbvector(i,1)= v(i,1)/sum;  
end  
 
disp('========================================');  
disp('输入的矩阵为：');  
A  
disp('所有的特征向量和特征值为：');  
v  
d  
disp('最大的特征值为：');  
tbmax  
disp('最大的特征值对应的特征向量为（标准化后的）：');  
tbvector