登录
A204549型
对称矩阵:f(i,j)=地板[(i+j+5)/4]-地板[(i+j+3)/4],通过(常数)对偶。
0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1
抵消
1
评论
{0,1}上的块矩阵。有关相关矩阵和永久值的指南,请参阅A204269型A204453型.
例子
西北角:
0 1 1 0 0 1 1 0
1 1 0 0 1 1 0 0
1 0 0 1 1 0 0 1
0 0 1 1 0 0 1 1
0 1 1 0 0 1 1 0
1 1 0 0 1 1 0 0
1 0 0 1 1 0 0 1
0 0 1 1 0 0 1 1
数学
f[i_,j_]:=
楼层[(i+j+5)/4]-楼层[(i+j+3)/4];
m[n_]:=表[f[i,j],{i,1,n},{j,1,n}]
表格形式[m[8]](*8x8主子矩阵*)
压扁[表[f[i,n+1-i],
{n,1,14},{i,1,n}]](*A204549型*)
永久[m]:=
使用[{a=Array[x,Length[m]]},
系数[Times@@(m.a),Times@@a]];
表[永久[m[n]],{n,1,22}](*A204550型*)
关键词
非n,
作者
克拉克·金伯利2012年1月16日
状态
经核准的