OFFSET
1,1
EXAMPLE
The sequence of integer partitions whose Heinz numbers are in the sequence begins: (11), (111), (22), (1111), (33), (222), (11111), (44), (111111), (2222), (55), (333), (1111111), (221111), (66), (22222), (11111111), (77), (222211), (444), (88), (331111), (111111111), (99), (22111111), (3333), (222222), (441111).
MATHEMATICA
Select[Range[1000], And[GCD@@FactorInteger[#][[All, 2]]>1, GCD@@Length/@Split[Sort[FactorInteger[#][[All, 2]]]]==1]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 12 2018
STATUS
approved