OFFSET
0,6
EXAMPLE
For y = (3,3,1,1) we have {{1,3},{1,3}}, so y is not counted under a(8).
For y = (3,2,2,1), although we have {{1,3},{2,2}}, the block {2,2} is not a set, so y is counted under a(8).
The a(4) = 1 through a(8) = 12 partitions:
(2,1,1) (2,2,1) (4,1,1) (3,2,2) (3,3,2)
(3,1,1) (3,1,1,1) (3,3,1) (4,2,2)
(2,1,1,1) (2,1,1,1,1) (5,1,1) (6,1,1)
(2,2,2,1) (3,2,2,1)
(3,2,1,1) (4,2,1,1)
(4,1,1,1) (5,1,1,1)
(2,2,1,1,1) (2,2,2,1,1)
(3,1,1,1,1) (3,2,1,1,1)
(2,1,1,1,1,1) (4,1,1,1,1)
(2,2,1,1,1,1)
(3,1,1,1,1,1)
(2,1,1,1,1,1,1)
MATHEMATICA
sps[{}]:={{}}; sps[set:{i_, ___}]:=Join@@Function[s, Prepend[#, s]& /@ sps[Complement[set, s]]]/@Cases[Subsets[set], {i, ___}];
mps[set_]:=Union[Sort[Sort/@(#/.x_Integer:>set[[x]])]& /@ sps[Range[Length[set]]]];
Table[Length[Select[IntegerPartitions[n], Length[Select[mps[#], And@@UnsameQ@@@#&&SameQ@@Total/@#&]]==0&]], {n, 0, 10}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 17 2025
STATUS
approved
