OFFSET
0,3
COMMENTS
The Heinz numbers of these partitions are given by A326847.
LINKS
Fausto A. C. Cariboni, Table of n, a(n) for n = 0..419
EXAMPLE
The a(1) = 1 through a(8) = 5 partitions:
(1) (2) (3) (4) (5) (6) (7) (8)
(11) (111) (22) (11111) (33) (1111111) (44)
(1111) (222) (2222)
(321) (4211)
(111111) (11111111)
The a(12) = 21 partitions:
(12)
(6,6)
(4,4,4)
(6,3,3)
(6,4,2)
(3,3,3,3)
(4,3,3,2)
(4,4,2,2)
(4,4,3,1)
(6,2,2,2)
(6,3,2,1)
(6,4,1,1)
(2,2,2,2,2,2)
(3,2,2,2,2,1)
(3,3,2,2,1,1)
(3,3,3,1,1,1)
(4,2,2,2,1,1)
(4,3,2,1,1,1)
(4,4,1,1,1,1)
(6,2,1,1,1,1)
(1,1,1,1,1,1,1,1,1,1,1,1)
MATHEMATICA
Table[Length[Select[IntegerPartitions[n, All, Divisors[n]], Divisible[n, Length[#]]&]], {n, 1, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jul 26 2019
STATUS
approved