OFFSET
1,1
COMMENTS
The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k).
An integer partition is superperiodic if either it consists of a single part equal to 1 or its parts have a common divisor > 1 and its multiset of multiplicities is itself superperiodic. For example, (8,8,6,6,4,4,4,4,2,2,2,2) has multiplicities (4,4,2,2) with multiplicities (2,2) with multiplicities (2) with multiplicities (1). The first four of these partitions are periodic and the last is (1), so (8,8,6,6,4,4,4,4,2,2,2,2) is superperiodic.
MATHEMATICA
Function[m, Times@@Prime/@m]/@NestList[Join@@Table[Table[2i, {Reverse[#][[i]]}], {i, Length[#]}]&, {1}, 4]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 12 2018
STATUS
approved