|
本帖最后由 hbghlyj 于 2022-10-18 21:15 编辑 Matrix Analysis, by Horn, Johnson, page 39
Mathematica:
In[1]:= J[n_]:=Table[Boole[i==j||i==1||j==1||i==n||j==n],{i,n},{j,n}]
In[2]:= Table[Simplify[CharacteristicPolynomial[J[n],x]],{n,3,10}]
Out[2]= {-((-3+x) x^2),x (2+x-4 x^2+x^3),-(-1+x)^2 x (-4-3 x+x^2),(-1+x)^3 x (-6-3 x+x^2),-(-1+x)^4 x (-8-3 x+x^2),(-1+x)^5 x (-10-3 x+x^2),-(-1+x)^6 x (-12-3 x+x^2),(-1+x)^7 x (-14-3 x+x^2)}
当$n≥5$时,如何证明$x(x-1)^{n-3}$是CharacteristicPolynomial[J[n],x]的因式呢
|
|