高分求助：matlab 求最大特征根

高分求助: matlab 求最大特征根 100
求高人帮助求解下面四个举证的最大特征根,只要结果就可以了,非常感谢!最佳答案还有追加分!! 矩阵A: 1 1/3 1/5 3 1 1/3 5 3 1 矩阵B1 1 1 1/5 1 1 1/3 5 3 1 矩阵B2 1 1/7 1/5 7 1 5 5 1/5

结果:
max_lumda_A =
3.0385

max_lumda_B1 =
3.0291

max_lumda_B2 =
3.1828

max_lumda_B3 =
4.1517

========================代码如下:==============
%%想要最大特征值所对应的特征向量,只要将相应的max_x_*输出即可
A=[
1 1/3 1/5
3 1 1/3
5 3 1];

[x,lumda]=eig(A);
r=abs(sum(lumda));
n=find(r==max(r));
max_lumda_A=lumda(n,n) %最大特征根
max_x_A=x(:,n); %最大特征根所对应的特征向量

B1=[
1 1 1/5
1 1 1/3
5 3 1];
[x,lumda]=eig(B1);
r=abs(sum(lumda));
n=find(r==max(r));
max_lumda_B1=lumda(n,n) %最大特征根
max_x_B1=x(:,n); %最大特征根所对应的特征向量

B2=[
1 1/7 1/5
7 1 5
5 1/5 1];
[x,lumda]=eig(B2);
r=abs(sum(lumda));
n=find(r==max(r));
max_lumda_B2=lumda(n,n) %最大特征根
max_x_B2=x(:,n); %最大特征根所对应的特征向量

B3=[
1 1/3 1/5 1/7
3 1 1/3 1/7
5 3 1 1
7 7 1 1];
[x,lumda]=eig(B3);
r=abs(sum(lumda));
n=find(r==max(r));
max_lumda_B3=lumda(n,n) %最大特征根
max_x_B3=x(:,n); %最大特征根所对应的特征向量