login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A366127
Number of finite incomplete multisets of positive integers with greatest non-subset-sum n.
2
1, 2, 4, 6, 11, 15, 25, 35, 53, 72, 108
OFFSET
1,2
COMMENTS
A non-subset-sum of a multiset of positive integers summing to n is an element of {1..n} that is not the sum of any submultiset. A multiset is incomplete if it has at least one non-subset-sum.
EXAMPLE
The non-subset-sums of y = {2,2,3} are {1,6}, with maximum 6, so y is counted under a(6).
The a(1) = 1 through a(6) = 15 multisets:
{2} {3} {4} {5} {6} {7}
{1,3} {1,4} {1,5} {1,6} {1,7}
{2,2} {2,3} {2,4} {2,5}
{1,1,4} {1,1,5} {3,3} {3,4}
{1,2,5} {1,1,6} {1,1,7}
{1,1,1,5} {1,2,6} {1,2,7}
{1,3,3} {1,3,4}
{2,2,2} {2,2,3}
{1,1,1,6} {1,1,1,7}
{1,1,2,6} {1,1,2,7}
{1,1,1,1,6} {1,1,3,7}
{1,2,2,7}
{1,1,1,1,7}
{1,1,1,2,7}
{1,1,1,1,1,7}
MATHEMATICA
prix[n_]:=If[n==1, {}, Flatten[Cases[FactorInteger[n], {p_, k_}:>Table[PrimePi[p], {k}]]]];
nmz[y_]:=Complement[Range[Total[y]], Total/@Subsets[y]];
Table[Length[Select[Join@@IntegerPartitions/@Range[n, 2*n], Max@@nmz[#]==n&]], {n, 5}]
CROSSREFS
For least instead of greatest we have A126796, ranks A325781, strict A188431.
These multisets have ranks A365830.
Counts appearances of n in the rank statistic A365920.
Column sums of A365921.
These multisets counted by sum are A365924, strict A365831.
The strict case is A366129.
A000041 counts integer partitions, strict A000009.
A046663 counts partitions without a submultiset summing k, strict A365663.
A325799 counts non-subset-sums of prime indices.
A364350 counts combination-free strict partitions, complement A364839.
A365543 counts partitions with a submultiset summing to k.
A365661 counts strict partitions w/ a subset summing to k.
A365918 counts non-subset-sums of partitions.
A365923 counts partitions by non-subset sums, strict A365545.
Sequence in context: A138461 A173397 A187492 * A103580 A094866 A072951
KEYWORD
nonn,more
AUTHOR
Gus Wiseman, Sep 30 2023
STATUS
approved