|
|
A326020
|
|
Number of complete subsets of {1..n}.
|
|
41
|
|
|
1, 2, 3, 4, 6, 9, 15, 27, 50, 95, 185, 365, 724, 1441, 2873, 5735, 11458, 22902, 45789, 91561, 183102, 366180, 732331, 1464626, 2929209, 5858367, 11716674, 23433277, 46866473, 93732852, 187465596, 374931067, 749861989, 1499723808, 2999447418
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
A set of positive integers summing to n is complete if every nonnegative integer up to n is the sum of some subset.
|
|
LINKS
|
|
|
EXAMPLE
|
The a(0) = 1 through a(6) = 15 subsets:
{} {} {} {} {} {} {}
{1} {1} {1} {1} {1} {1}
{1,2} {1,2} {1,2} {1,2} {1,2}
{1,2,3} {1,2,3} {1,2,3} {1,2,3}
{1,2,4} {1,2,4} {1,2,4}
{1,2,3,4} {1,2,3,4} {1,2,3,4}
{1,2,3,5} {1,2,3,5}
{1,2,4,5} {1,2,3,6}
{1,2,3,4,5} {1,2,4,5}
{1,2,4,6}
{1,2,3,4,5}
{1,2,3,4,6}
{1,2,3,5,6}
{1,2,4,5,6}
{1,2,3,4,5,6}
|
|
MATHEMATICA
|
Table[Length[Select[Subsets[Range[n]], Union[Plus@@@Subsets[#]]==Range[0, Total[#]]&]], {n, 0, 10}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|