OFFSET
0,4
COMMENTS
EXAMPLE
The a(1) = 1 through a(11) = 12 strict partitions:
(1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B)
(21) (31) (32) (42) (43) (53) (54) (64) (65)
(41) (51) (52) (62) (63) (73) (74)
(61) (71) (72) (82) (83)
(421) (521) (81) (91) (92)
(432) (631) (A1)
(531) (721) (542)
(621) (632)
(641)
(731)
(821)
(5321)
MATHEMATICA
biqQ[y_]:=MemberQ[Total/@Subsets[y], Total[y]/2];
Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&!biqQ[#]&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Apr 07 2024
STATUS
approved