A365922 Number of non-subset-sums of strict integer partitions of n.
0, 1, 2, 4, 8, 11, 18, 25, 38, 51, 70, 93, 122, 159, 206, 263, 328, 420, 514, 645, 776, 967, 1154, 1413, 1686, 2042, 2414, 2890, 3394, 4062, 4732, 5598, 6494, 7652, 8836, 10329, 11884, 13833, 15830, 18376, 20936, 24131, 27476, 31547, 35780, 40966, 46292, 52737
Offset: 1
Keywords
Examples
The a(6) = 11 ways, showing each strict partition and its non-subset-sums: (6): 1,2,3,4,5 (51): 2,3,4 (42): 1,3,5 (321):
Crossrefs
Programs
-
Mathematica
Table[Total[Length[Complement[Range[n], Total/@Subsets[#]]]& /@ Select[IntegerPartitions[n], UnsameQ@@#&]],{n,30}]
Comments