This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A171758 #7 Sep 01 2020 08:42:02 %S A171758 10,100,1000,1010,10000,10010,10100,10110,100000,100010,100100,100110, %T A171758 101000,101010,101100,101110,1000000,1000010,1000100,1000110,1001000, %U A171758 1001010,1001100,1001110,1010000,1010010,1010100,1010110,1011000,1011010,1011100,1011110 %N A171758 Binary expansion of numbers in A171757. %H A171758 Amiram Eldar, <a href="/A171758/b171758.txt">Table of n, a(n) for n = 1..10000</a> %F A171758 a(n) = A007088(A171757(n)). - _Amiram Eldar_, Sep 01 2020 %t A171758 bin[n_] := FromDigits[IntegerDigits[n, 2]]; bin /@ Select[Range[2, 100, 2], IntegerDigits[#, 2][[1 ;; 2]] == {1, 0} &] (* _Amiram Eldar_, Sep 01 2020 *) %Y A171758 Cf. A007088, A171757. %K A171758 nonn,base %O A171758 1,1 %A A171758 _N. J. A. Sloane_, Oct 12 2010