|
|
A297932型 |
| 矩形数组,通过反对偶:第n行给出以2位数字d(m),d(m-1),…,为基数的数字,。。。,d(0)具有n作为0的最大运行长度。 |
|
三
|
|
|
1, 3, 2, 7, 5, 4, 15, 6, 9, 8, 31, 10, 12, 17, 16, 63, 11, 18, 24, 33, 32, 127, 13, 19, 34, 48, 65, 64, 255, 14, 20, 35, 66, 96, 129, 128, 511, 21, 25, 40, 67, 130, 192, 257, 256, 1023, 22, 28, 49, 80, 131, 258, 384, 513, 512, 2047, 23, 36, 56, 97, 160, 259
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
每个正整数只发生一次,所以作为一个序列,这是正整数的置换。
|
|
链接
|
|
|
例子
|
西北角:
1 3 7 15 31 63 127
2 5 6 10 11 13 14
4 9 12 18 19 20 25
8 17 24 34 35 40 49
16 33 48 66 67 80 97
32 65 96 130 131 160 193
***
以2位数字为基数的72:1,0,0,1,0,0,0,运行00和000为0,因此72位于第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
TableForm[表格[扁平[位置[t[0],d]],{d,0,8}]](*A297932型数组*)
u[d_]:=压扁[位置[t[0],d]]
v[d,n]:=u[d][[n]];
表[v[n,k-n+1],{k,0,11},{n,0,k}]//扁平(*A297932型序列*)
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|