OFFSET
0,6
COMMENTS
The Heinz numbers of these partitions are given by A371168.
EXAMPLE
The partition (4,3,2) has 3 parts {2,3,4} and 4 distinct divisors of parts {1,2,3,4}, so is counted under a(9).
The a(2) = 1 through a(10) = 11 partitions:
(2) (3) (4) (5) (6) (7) (8) (9) (10)
(3,2) (4,2) (4,3) (4,4) (5,4) (6,4)
(4,1) (5,2) (5,3) (6,3) (7,3)
(6,1) (6,2) (7,2) (8,2)
(4,3,1) (8,1) (9,1)
(6,1,1) (4,3,2) (4,3,3)
(6,2,1) (5,3,2)
(5,4,1)
(6,2,2)
(6,3,1)
(8,1,1)
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], Length[#] < Length[Union@@Divisors/@#]&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 16 2024
STATUS
approved