|
| |
|
| A367665 |
| N的分区数，使得以递增顺序排列的不同项形成两个或多个连续整数的字符串。 |
|
六
|
|
|
|
0, 0, 0，1, 1, 3，3, 6, 6，10, 11, 16，17, 24, 27，35, 39, 50，57, 70, 79，97, 111, 132，150, 178, 204，239, 271, 316，361, 416, 472，545, 618, 706，545, 618, 706，γ，γ，γ，γ，γ
（列表；图表；参考文献；听；历史；文本；内部格式）
|
|
|
|
抵消
|
0. 6
|
|
|
评论
|
n个分区之间的最大间隔数＝1；列k＝1A28353. [乔尔格阿尔恩特3月23日2014
猜想：αa（n＋1）＝n的不同部分中的最小部分和和偶数个部分。-乔治贝克06五月2017
|
|
|
链接
|
Alois P. Heinzn，a（n）n＝0…1000的表
Shane Chern（萧航晨）关于George Beck的猜想。二，2018。
|
|
|
例子
|
8的限定分区是332, 3221, 32111，22211, 221111, 2111111，因此A（8）＝6，α（以增加的顺序排列的不同部分的字符串是23, 123, 123，12, 12, 12）。
|
|
|
枫树
|
B: = PROC（n，i，t）选项记住；
（α＝0）或i＝1，IF’（n＝0，t＝2或n> 0，t＞0, 1, 0）；
（i）n（0），加法（b（n- i*j，i-1，min（t＋1, 2）），j＝1…n/i）
第二端：
A:＝N->加法（B（n，i，0），i＝1…n）：
Seq（a（n），n＝0…60）；阿洛伊斯·P·海因茨2月15日2014
|
|
|
Mathematica
|
映射[长度] [映射[差异[DeleDealPosial[O[Y] ]，整数分区[Y] ]，（表[-1，{长度[y]（}] }）=＝y＆＆y＝！= {{}）＆] ]，范围[55 ] ]皮特·J·摩西，FEB 09 2014＊）
I[，t]：=B[n，i，t]＝[n=＝0＞i＝1，如果n＝0 &&t＝2＞n＞0 &&t＞0, 1, 0〕，如果[i＞n，0 [b] [n[i*j，i-1，min [t+1, 2 ] ]，{j，1，n/i}[] ]，a [n]：=和[b[n，i，0 ]，{i，1，n}]；表[a[n]，{n，0, 60 }]（*）B[N]让弗兰11月17日2015后阿洛伊斯·P·海因茨*）
|
|
|
交叉裁判
|
囊性纤维变性。A034，A367666，A092265.
语境中的顺序：A000 8805 A188270 A026925*A088 528 A220153 A219627
相邻序列：γA367662 A37663 A37664*A367666 A367667 A367668
|
|
|
关键词
|
诺恩，容易
|
|
|
作者
|
克拉克·金伯利2月11日2014
|
|
|
地位
|
经核准的
|
| |
|
|
