A316889 Heinz numbers of aperiodic integer partitions whose reciprocal sum is 1.
2, 147, 195, 3185, 6475, 6591, 7581, 10101, 10527, 16401, 20445, 20535, 21045, 25365, 46155, 107653, 123823, 142805, 164255, 164983, 171941, 218855, 228085, 267883, 304175, 312785, 333925, 333935, 335405, 343735, 355355, 390963, 414295, 442975, 444925, 455975
Offset: 1
Keywords
Examples
Sequence of partitions whose Heinz numbers belong to the sequence begins: (1), (4,4,2), (6,3,2), (6,4,4,3), (12,4,3,3), (6,6,6,2), (8,8,4,2), (12,6,4,2), (10,5,5,2), (20,5,4,2), (15,10,3,2), (12,12,3,2), (18,9,3,2), (24,8,3,2), (42,7,3,2).
Links
Crossrefs
Programs
-
Mathematica
Select[Range[2,100000],And[GCD@@FactorInteger[#][[All,2]]==1,Sum[m[[2]]/PrimePi[m[[1]]],{m,FactorInteger[#]}]==1]&]
Comments