A122947-OEIS公司

A122947号

三角形序列：1，1-x，-1-x+x^2，1+3x+x*2-x^3，1-x-4x^2-x^3+x^4，-1-x+6x^2+8x^3+x^4-x^5，-1+3x+6x*2-7x^3-10x^4-x*5+x^6。

1, 1, -1, -1, -1, 1, 1, 3, 1, -1, 1, -1, -4, -1, 1, -1, -1, 6, 8, 1, -1, -1, 3, 6, -7, -10, -1, 1, -1, 7, -6, -14, 8, 12, 1, -1, 1, 1, -13, 8, 20, -8, -13, -1, 1, -1, -3, 11, 17, -36, -26, 27, 21, 1, -1, -1, 1, 19, -26, -53, 63, 53, -32, -25, -1, 1, -1, 5, 15, -89, 54, 144, -102, -92, 37, 29, 1, -1, 1, 3, -27, -10, 169, -89, -226, 127, 121

(列表;桌子;图表;参考;听;历史;文本;内部格式)

抵消

1,8

矩阵：1

X 1{{1}}

2X2{{1，1}，{1，0}}

3X3{{1,1,1}，{1,0,1}，}

4X4{{1，1，1

5X5{{1，1，1

6X6{{1，1，1

链接

n，a（n）表，n=1..87。

例子

三角形序列：

{1},

{1, -1},

{-1, -1, 1},

{1, 3, 1, -1},

{1, -1, -4, -1, 1},

{-1, -1, 6, 8, 1, -1},

{-1, 3, 6, -7, -10, -1, 1},

{-1, 7, -6, -14, 8, 12, 1, -1}

数学

c[i_，k_]：=楼层[Mod[i/2^k，2]；

An[d_]：=表[If[Sum[c[n，k]*c[m，k]，{k，0，d-1}]==0，1，0]，{n，0，d-1}，{m，0，d-1}]；加入〔｛｛1｝｝，

表[系数表[特征多项式[An[d]，x]，x]{d，1，20}]]；

压扁[%]

交叉参考

上下文中的序列：A268523型 A195768号 A016465号*A367990型 A360162型 A367988型

相邻序列：A122944号 A122945号 A122946号*A122948号 A122949号 A122950号

关键词

表,未经编辑的,较少的,签名

作者

罗杰·巴古拉和加里·W·亚当森2006年10月24日

状态

经核准的