A371794 Number of non-biquanimous strict integer partitions of n.
0, 1, 1, 2, 2, 3, 3, 5, 5, 8, 7, 12, 11, 18, 15, 27, 23, 38, 30, 54, 43, 76, 57, 104, 79, 142, 102, 192, 138, 256, 174, 340, 232, 448, 292, 585, 375, 760, 471, 982, 602, 1260, 741, 1610, 935, 2048, 1148, 2590, 1425, 3264, 1733, 4097, 2137, 5120, 2571, 6378
Offset: 0
Keywords
Examples
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)
Crossrefs
A371783 counts k-quanimous partitions.
Programs
-
Mathematica
biqQ[y_]:=MemberQ[Total/@Subsets[y],Total[y]/2]; Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&!biqQ[#]&]],{n,0,30}]
Comments