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 A087136 #8 Aug 25 2019 10:38:23
%S A087136 1,2,4,6,10,12,14,22,26,28,30,46,54,58,60,62,94,110,118,122,124,126,
%T A087136 190,222,238,246,250,252,254,382,446,478,494,502,506,508,510,766,894,
%U A087136 958,990,1006,1014,1018,1020,1022,1534,1790,1918,1982,2014,2030,2038
%N A087136 Smallest positive number m such that A073642(m)=n.
%C A087136 A073642(a(n))=n and A073642(k)<n for k<a(n);
%C A087136 A073642(A000051(n))=n and A073642(k)>n for k>A000051(n).
%t A087136 i = 1; Table[While[Total[Flatten[Position[Rest[Reverse[IntegerDigits[i, 2]]], 1]]] != k, i++]; i, {k, 0, 52}] (* _Jayanta Basu_, Aug 12 2013 *)
%Y A087136 Cf. A087135.
%K A087136 nonn
%O A087136 0,2
%A A087136 _Reinhard Zumkeller_, Aug 17 2003
%E A087136 "Positive" added to definition by _N. J. A. Sloane_, Aug 25 2019