|
| |
|
| A297933型 |
| 反对偶矩形数组：第n行给出以2位数字d（m），d（m-1），…，为基数的数字。。。，d（0）具有n作为1的最大运行长度。 |
|
三
|
|
|
|
1, 2, 3, 4, 6, 7, 5, 11, 14, 15, 8, 12, 23, 30, 31, 9, 13, 28, 47, 62, 63, 10, 19, 29, 60, 95, 126, 127, 16, 22, 39, 61, 124, 191, 254, 255, 17, 24, 46, 79, 125, 252, 383, 510, 511, 18, 25, 55, 94, 159, 253, 508, 767, 1022, 1023, 20, 26, 56, 111, 190, 319
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
每个正整数只发生一次，所以作为一个序列，这是正整数的置换。
|
|
|
链接
|
|
|
|
例子
|
西北角：
1 2 4 5 8 9 10 16
3 6 11 12 13 19 22 24
7 14 23 28 29 39 46 55
15 30 47 60 61 79 94 111
31 62 95 124 125 159 190 223
63 126 191 252 253 319 382 447
127 254 383 508 509 639 766 895
***
以2位数字59为基数：1,1,1,0,1,1，第111行和第11行为1，因此59位于第3行。
|
|
|
数学
|
b=2；s[n_]：=拆分[Integer Digits[n，b]]；
m[n_，d_]：=并集[Select[s[n]，MemberQ[#，d]&]]
h[n_，d_]：=最大值[Map[长度，m[n，d]]
z=6000；w=t[d_]：=表[h[n，d]，{n，1，z}]/-无穷大->0
表格形式[Table[Flatten[Position[t[1]，d]]，｛d，0，8｝]](*A297933型数组*）
u[d_]：=压扁[位置[t[1]，d]]
v[d，n]：=u[d][[n]]；
表[v[n，k-n+1]，{k，1，11}，{n，1，k}]//扁平(*A297933型序列*）
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
