A171764 Binary expansion of numbers in A171763.
101, 1001, 1011, 10001, 10011, 10101, 10111, 100001, 100011, 100101, 100111, 101001, 101011, 101101, 101111, 1000001, 1000011, 1000101, 1000111, 1001001, 1001011, 1001101, 1001111, 1010001, 1010011, 1010101, 1010111, 1011001, 1011011, 1011101, 1011111, 10000001
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
bin[n_] := FromDigits[IntegerDigits[n, 2]]; bin /@ Select[Range[3, 130, 2], IntegerDigits[#, 2][[1 ;; 2]] == {1, 0} &] (* Amiram Eldar, Sep 01 2020 *)