|
| |
| |
|
|
|
1, 1, 2, 4, 7, 11, 17, 26, 37, 52, 73, 95, 125, 163, 208, 261, 330, 407, 498, 607, 734, 881, 1056, 1250, 1480, 1738, 2029, 2359, 2742, 3160, 3635, 4169, 4760, 5414, 6151, 6957, 7861, 8858, 9952, 11148, 12483, 13934, 15526, 17267, 19173, 21252, 23535, 25991
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
0.3
|
|
|
评论
|
也称为日志压缩合成。
序列的第一个商被定义为序列是一个递增的除数链，因此例如，（6,3,1）的第一个商数是（1/2,1/3）。
|
|
|
链接
|
|
|
|
例子
|
成分（4,2,1,2,3）具有第一商（1/2,1/2,2,3/2），因此不计入a（12）项下，即使第一差（-2，-1,1,1）略有增加。
a（1）=1到a（6）=17组分：
(1) (2) (3) (4) (5) (6)
(1,1) (1,2) (1,3) (1,4) (1,5)
(2,1) (2,2) (2,3) (2,4)
(1,1,1) (3,1) (3,2) (3,3)
（1,1,2）（4,1）（4,2）
(2,1,1) (1,1,3) (5,1)
(1,1,1,1) (2,1,2) (1,1,4)
(3,1,1) (2,1,3)
(1,1,1,2) (2,2,2)
(2,1,1,1) (3,1,2)
(1,1,1,1,1) (4,1,1)
(1,1,1,3)
(2,1,1,2)
(3,1,1,1)
（1,1,1,1,2）
(2,1,1,1,1)
(1,1,1,1,1,1)
|
|
|
MAPLE公司
|
b： =proc（n，q，l）选项记忆`如果`（n=0，1，添加(
`如果`（q=0或q>=l/j，b（n-j，l/j，j），0），j=1..n））
结束时间：
a： =n->b（n，0$2）：
|
|
|
数学
|
表[Length[Select[Join@@Permutations/@IntegerPartitions[n]，LessEqual@@Divide@@Reverse/@Partition[#，2，1]&]]，{n，0，15}]
（*第二个节目：*）
b[n_，q_，l_]：=b[n，q，l]=如果[n==0，1，总和[
如果[q==0||q>=l/j，b[n-j，l/j，j]，0]，{j，1，n}]]；
a[n_]：=b[n，0，0]；
|
|
|
交叉参考
|
囊性纤维变性。A003242号,A008965号,A048004型,A059966号,A067824号,A167606型,A253249号,1974年2月,A318991型,A318992型,A342527飞机,324528美元.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
