|
| |
|
| A316854型 |
| n的整数分区数，其倒数和是整数的倒数。 |
|
31
|
|
|
|
1, 1, 1, 2, 1, 1, 1, 2, 3, 2, 2, 2, 1, 1, 1, 4, 2, 4, 1, 5, 1, 5, 1, 3, 4, 2, 5, 6, 5, 5, 4, 5, 5, 4, 8, 10, 9, 7, 5, 9, 10, 6, 12, 10, 8, 7, 6, 9, 13, 15, 8, 19, 13, 19, 19, 19, 18, 22, 26, 28, 28, 29, 22, 33, 29, 28, 38, 34, 26, 40, 32, 43, 39, 51, 38, 62, 46
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,4个
|
|
|
评论
|
（y_1，…，y_k）的倒数和是1/y_1+…+1/y_k。
|
|
|
链接
|
|
|
|
例子
|
a（36）=10个分区：
(36),
（30，6），（24，12），（18，18），
(12,12,12),
(12,12,6,6),
(15,10,4,4,3), (12,12,6,3,3), (12,8,8,6,2),
(6,6,6,6,6,6).
|
|
|
数学
|
表[Length[Select[Integer Partitions[n]，IntegerQ[1/Sum[1/m，{m，#}]&]]，{n，30}]
ric[n_，p_，s_]：=如果[n==0，如果[IntegerQ[1/s]，c++]，做[If[s+1/i<=1，ric[n-i，追加[p，i]，s+1/i]]，{i，最小值[p[-1]]，n]，1，-1}]]；a[n]：=（c=0；做[ric[n-j，{j}，1/j]，{j，n}]；c）；阵列[a，80]（*在乔瓦尼·雷斯塔之后A316898型,罗伯特·威尔逊v2018年7月23日*）
|
|
|
黄体脂酮素
|
（PARI）a（n）={my（s=0）；对于部分（p=n，如果（frac（1/sum（i=1，#p，1/p[i]））==0，s++）；s}\\安德鲁·霍罗伊德2018年7月15日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
