|
|
A346201飞机 |
| 行读取的三角形数组。T(n,k)是GF(2)上n个Xn矩阵的个数,使得它们的特征空间在所有特征值上的维数之和为k,0<=k<=n,n>=0。 |
|
0
|
|
|
1, 0, 2, 2, 6, 8, 48, 196, 210, 58, 5824, 23280, 27020, 8610, 802, 2887680, 11550848, 13756560, 4757260, 581250, 20834, 5821595648, 23286380544, 28097284992, 10075582800, 1369706604, 67874562, 1051586, 47317927329792, 189271709384704, 229853403924480, 83865929653632, 11957394226896, 668707460652, 14779207170, 102233986
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
链接
|
|
|
例子
|
1;
0, 2;
2, 6, 8;
48, 196, 210, 58;
5824, 23280, 27020, 8610, 802;
2887680, 11550848, 13756560, 4757260, 581250, 20834;
|
|
数学
|
nn=8;q=2;b[p_,i_]:=计数[p,i];d[p_,i_]:=Sum[j b[p,j],{j,1,i}]+i Sum[b[p,j],{j,i+1,Total[p]}];aut[deg_,p_]:=产品[产品[q^(d[p,i]deg)-q^;A001037号=
表[1/n和[MoebiusMu[n/d]q^d,{d,除数[n]}],{n,1,nn}];g[u_,v_]:=
总计[Map[v^Length[#]u^Total[#]/aut[1,#]&,Level[Table[Integer Partitions[n],{n,0,nn}],{2}]];表[Take[(表[Product[q^n-q^i,{i,0,n-1}],{n,0,nn}]系数列表[Series[g[u,v]g[u,v]Product[Product[1/(1-(u/q^r)^d),{r,1,\[Infinity]}]^A001037号[[d]],{d,2,nn}],{u,0,nn}],{u,v}])[[n]],
n] ,{n,1,nn}]//网格
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|