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 A350572 #17 Jan 10 2022 11:02:52
%S A350572 0,1,2,3,4,5,6,7,8,9,12,13,16,17,19,20,21,23,24,25,28,29,32,33,40,42,
%T A350572 44,45,47,48,49,53,60,61,64,65,66,80,81,82,90,91,96,97,100,112,113,
%U A350572 121,128,129,137,144,145,152,161,192,193,203
%N A350572 Base-10 version of A038102 interpreted as base 2.
%H A350572 Hans Havermann, <a href="/A350572/b350572.txt">Table of n, a(n) for n = 1..1512</a> (terms 1..1167 from Robert G. Wilson v).
%t A350572 B2[n_] := FromDigits[IntegerDigits[n, 2]]
%t A350572 SP[n_] := (b = B2[n]; StringPosition[ToString[B2[b]], ToString[b]])
%t A350572 n=0; t={}; While[n<10^6, If[SP[n]!={}, AppendTo[t,n]]; n++]; t
%t A350572 (* _Hans Havermann_, Jan 06 2022 *)
%o A350572 (Python)
%o A350572 def ok(n): b = bin(n)[2:]; return b in bin(int(b))
%o A350572 print([k for k in range(204) if ok(k)]) # _Michael S. Branicky_, Jan 06 2022
%Y A350572 Cf. A038102, A350573.
%K A350572 nonn,base
%O A350572 1,3
%A A350572 _Robert G. Wilson v_, Jun 30 2014; entered by _Hans Havermann_, Jan 06 2022