login
A316894
Number of aperiodic integer partitions of n whose reciprocal sum is the reciprocal of an integer.
0
1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1, 2, 2, 2, 1, 4, 1, 5, 1, 2, 3, 2, 4, 5, 5, 5, 4, 3, 5, 4, 8, 6, 9, 7, 5, 6, 10, 6, 12, 8, 7, 7, 6, 6, 12, 12, 8, 18, 13, 16, 19, 17, 18, 21, 26, 26, 28, 29, 21, 29, 29, 27, 38, 32, 26, 37, 32, 38, 39, 49, 36, 61, 46, 55
OFFSET
1,9
COMMENTS
The reciprocal sum of (y_1, ..., y_k) is 1/y_1 + ... + 1/y_k.
A partition is aperiodic if its multiplicities are relatively prime.
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], And[GCD@@Length/@Split[#]==1, IntegerQ[1/Sum[1/m, {m, #}]]]&]], {n, 30}]
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jul 16 2018
EXTENSIONS
a(51)-a(78) from Giovanni Resta, Jul 16 2018
STATUS
approved