OFFSET
0,7
COMMENTS
By "proper" we exclude the case of all singletons, which is disjoint when n is squarefree.
EXAMPLE
For the partition (8,5,2) we have four choices:
((8),(4,1),(2))
((7,1),(5),(2))
((5,3),(4,1),(2))
((4,3,1),(5),(2))
Hence (8,5,2) is counted under a(15).
The a(5) = 1 through a(12) = 12 partitions:
(5) (6) (7) (8) (9) (10) (11) (12)
(3,3) (4,4) (5,4) (5,5) (6,5) (6,6)
(5,3) (6,3) (6,4) (7,4) (7,5)
(7,1) (7,2) (7,3) (8,3) (8,4)
(8,1) (8,2) (9,2) (9,3)
(9,1) (10,1) (10,2)
(4,3,3) (5,3,3) (11,1)
(4,4,2) (5,5,1) (5,5,2)
(6,3,3)
(6,4,2)
(6,5,1)
(9,2,1)
MATHEMATICA
pofprop[y_]:=Select[DeleteCases[Join@@@Tuples[IntegerPartitions/@y], y], UnsameQ@@#&];
Table[Length[Select[IntegerPartitions[n], Length[pofprop[#]]>1&]], {n, 0, 15}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Gus Wiseman, May 30 2025
STATUS
approved
