OFFSET
1,22
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.
LINKS
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], And[GCD@@#==1, GCD@@Length/@Split[#]==1, Sum[1/m, {m, #}]==1]&]], {n, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jul 16 2018
EXTENSIONS
a(71)-a(80) from Giovanni Resta, Jul 16 2018
STATUS
approved