login
A171758
Binary expansion of numbers in A171757.
3
10, 100, 1000, 1010, 10000, 10010, 10100, 10110, 100000, 100010, 100100, 100110, 101000, 101010, 101100, 101110, 1000000, 1000010, 1000100, 1000110, 1001000, 1001010, 1001100, 1001110, 1010000, 1010010, 1010100, 1010110, 1011000, 1011010, 1011100, 1011110
OFFSET
1,1
LINKS
FORMULA
a(n) = A007088(A171757(n)). - Amiram Eldar, Sep 01 2020
MATHEMATICA
bin[n_] := FromDigits[IntegerDigits[n, 2]]; bin /@ Select[Range[2, 100, 2], IntegerDigits[#, 2][[1 ;; 2]] == {1, 0} &] (* Amiram Eldar, Sep 01 2020 *)
CROSSREFS
Sequence in context: A055992 A115814 A350215 * A115798 A077439 A136839
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Oct 12 2010
STATUS
approved