OFFSET
1,2
COMMENTS
The reciprocal sum of (y_1, ..., y_k) is 1/y_1 + ... + 1/y_k.
The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k).
EXAMPLE
195 is the Heinz number of (6,3,2), which has reciprocal sum 1/6 + 1/3 + 1/2 = 1, which is an integer, so 195 belongs to the sequence.
The sequence of all integer partitions whose reciprocal sum is an integer begins: (), (1), (11), (111), (22), (1111), (221), (11111), (2211), (111111), (22111), (2222).
MATHEMATICA
Select[Range[1000], IntegerQ[Sum[m[[2]]/PrimePi[m[[1]]], {m, If[#==1, {}, FactorInteger[#]]}]]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jul 14 2018
STATUS
approved