OFFSET
1,3
COMMENTS
EXAMPLE
The binary indices of 75 are (1,2,4,7), with differences (1,2,3), so 75 is in the sequence.
The terms together with their binary expansions and binary indices begin:
0: 0 ~ {}
1: 1 ~ {1}
2: 10 ~ {2}
3: 11 ~ {1,2}
4: 100 ~ {3}
5: 101 ~ {1,3}
6: 110 ~ {2,3}
8: 1000 ~ {4}
9: 1001 ~ {1,4}
10: 1010 ~ {2,4}
11: 1011 ~ {1,2,4}
12: 1100 ~ {3,4}
13: 1101 ~ {1,3,4}
MATHEMATICA
bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n, 2]], 1];
Select[Range[0, 100], UnsameQ@@Differences[bpe[#]]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Nov 19 2025
STATUS
approved
