Svoboda | Graniru | BBC Russia | Golosameriki | Facebook
login
A365045
Number of subsets of {1..n} containing n such that no element can be written as a positive linear combination of the others.
11
0, 1, 1, 2, 4, 11, 23, 53, 111, 235, 483, 988, 1998, 4036, 8114, 16289, 32645, 65389, 130887, 261923, 524014, 1048251, 2096753, 4193832, 8388034, 16776544, 33553622, 67107919, 134216597, 268434140, 536869355, 1073740012, 2147481511, 4294964834, 8589931700
OFFSET
0,4
COMMENTS
Also subsets of {1..n} containing n whose greatest element cannot be written as a positive linear combination of the others.
LINKS
FORMULA
a(n) = A070880(n) + 1 for n > 0.
EXAMPLE
The subset {3,4,10} has 10 = 2*3 + 1*4 so is not counted under a(10).
The a(0) = 0 through a(5) = 11 subsets:
. {1} {2} {3} {4} {5}
{2,3} {3,4} {2,5}
{2,3,4} {3,5}
{1,2,3,4} {4,5}
{2,4,5}
{3,4,5}
{1,2,3,5}
{1,2,4,5}
{1,3,4,5}
{2,3,4,5}
{1,2,3,4,5}
MATHEMATICA
combp[n_, y_]:=With[{s=Table[{k, i}, {k, y}, {i, 1, Floor[n/k]}]}, Select[Tuples[s], Total[Times@@@#]==n&]];
Table[Length[Select[Subsets[Range[n]], MemberQ[#, n]&&And@@Table[combp[#[[k]], Union[Delete[#, k]]]=={}, {k, Length[#]}]&]], {n, 0, 10}]
CROSSREFS
The nonempty case is A070880.
The nonnegative version is A124506, first differences of A326083.
The binary version is A288728, first differences of A007865.
A subclass is A341507.
The complement is counted by A365042, first differences of A365043.
First differences of A365044.
The nonnegative complement is A365046, first differences of A364914.
The binary complement is A365070, first differences of A093971.
Without re-usable parts we have A365071, first differences of A151897.
A085489 and A364755 count subsets w/o the sum of two distinct elements.
A088809 and A364756 count subsets with the sum of two distinct elements.
A364350 counts combination-free strict partitions, complement A364839.
A364913 counts combination-full partitions.
Sequence in context: A038047 A358082 A061152 * A307881 A006452 A104430
KEYWORD
nonn
AUTHOR
Gus Wiseman, Aug 24 2023
STATUS
approved