OFFSET
1,2
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.
EXAMPLE
The sequence of terms together with their binary indices begins:
1: 1
2: 2
4: 3
7: 1 2 3
8: 4
14: 2 3 4
16: 5
21: 1 3 5
28: 3 4 5
31: 1 2 3 4 5
32: 6
39: 1 2 3 6
42: 2 4 6
56: 4 5 6
57: 1 4 5 6
61: 2 3 4 5 6
MATHEMATICA
bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n, 2]], 1];
Select[Range[100], MemberQ[bpe[#], Mean[bpe[#]]]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 13 2019
STATUS
approved