OEIS哀悼西蒙斯并感谢西蒙斯基金会对包括OEIS在内的许多科学分支研究的支持。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A204545型 对称矩阵:f(i,j)=地板[(i+j+3)/4]-地板[(i+j+1)/4],通过(常数)对偶。
1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 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, 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, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0 (列表桌子图表参考历史文本内部格式)
抵消
1
评论
{0,1}上的块矩阵。有关相关矩阵和永久值的指南,请参阅A204269型2004年2月53日.
链接
例子
西北角:
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
0 1 1 0 0 1 1 0
1 1 0 0 1 1 0 0
数学
f[i_,j_]:=楼层[(i+j+3)/4]-楼层[(i+j+1)/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}]](*A204545型*)
永久[m]:=
使用[{a=Array[x,Length[m]]},
系数[Times@@(m.a),Times@@a]];
表[永久[m[n]],{n,1,22}](*A204546型*)
交叉参考
囊性纤维变性。2004年2月46日,A204296型.
关键词
非n,
作者
克拉克·金伯利2012年1月16日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年6月4日22:04。包含373102个序列。(在oeis4上运行。)