A171758 Binary expansion of numbers in A171757.

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

Amiram Eldar, Table of n, a(n) for n = 1..10000

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

Cf. A007088, A171757.

Sequence in context: A055992 A115814 A350215 * A115798 A077439 A136839

Adjacent sequences: A171755 A171756 A171757 * A171759 A171760 A171761

Keyword

nonn,base

Author

N. J. A. Sloane, Oct 12 2010

Status

approved