OFFSET
1,1
COMMENTS
The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.
MATHEMATICA
Select[Range[2, 100], !Divisible[#, Prime[PrimeOmega[#]]]&]
CROSSREFS
Partitions of this type are counted by A229816.
KEYWORD
nonn
AUTHOR
Gus Wiseman, Nov 21 2023
STATUS
approved