|
|
A370643
|
|
Number of subsets of {2..n} such that it is not possible to choose a different binary index of each element.
|
|
5
|
|
|
0, 0, 0, 0, 0, 1, 7, 23, 46, 113, 287, 680, 1546, 3374, 7191, 15008
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,7
|
|
COMMENTS
|
A binary index of n is any position of a 1 in its reversed binary expansion. The binary indices of n are row n of A048793.
|
|
LINKS
|
|
|
EXAMPLE
|
The a(0) = 0 through a(7) = 23 subsets:
. . . . . {2,3,4,5} {2,4,6} {2,4,6}
{2,3,4,5} {2,3,4,5}
{2,3,4,6} {2,3,4,6}
{2,3,5,6} {2,3,4,7}
{2,4,5,6} {2,3,5,6}
{3,4,5,6} {2,3,5,7}
{2,3,4,5,6} {2,3,6,7}
{2,4,5,6}
{2,4,5,7}
{2,4,6,7}
{2,5,6,7}
{3,4,5,6}
{3,4,5,7}
{3,4,6,7}
{3,5,6,7}
{4,5,6,7}
{2,3,4,5,6}
{2,3,4,5,7}
{2,3,4,6,7}
{2,3,5,6,7}
{2,4,5,6,7}
{3,4,5,6,7}
{2,3,4,5,6,7}
|
|
MATHEMATICA
|
bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n, 2]], 1];
Table[Length[Select[Subsets[Range[2, n]], Select[Tuples[bpe/@#], UnsameQ@@#&]=={}&]], {n, 0, 10}]
|
|
CROSSREFS
|
A070939 gives length of binary expansion.
A096111 gives product of binary indices.
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|