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 A239751 #18 Apr 04 2014 16:43:07
%S A239751 16,32,64,128,129,132,136,144,192,256,257,258,264,272,288,384,512,513,
%T A239751 514,516,528,544,576,768,1024,1025,1026,1028,1032,1056,1088,1152,1153,
%U A239751 1154,1156,1168,1184,1216,1280,1281,1282,1284,1288,1296,1312,1344,1536,1537,1538,1544,1552,1568,1664
%N A239751 Numbers whose number of nonzero binary digits is less than their number of nonzero decimal digits.
%C A239751 If Hebrew gematria (A051596) were replaced with a "binary gematria" where aleph=1, bet=2, gimel=4, etc., this sequence would be a subset of "numbers whose binary gematria has fewer letters than their original gematria".
%H A239751 Michael Turniansky, <a href="/A239751/b239751.txt">Table of n, a(n) for n = 1..200</a>
%F A239751 n such that A000120(n)<A055640(n).
%t A239751 Select[Range[1664], Less @@ Total /@ Sign /@ IntegerDigits[#, {2, 10}] &] (* _Giovanni Resta_, Mar 26 2014 *)
%o A239751 (APL) ((+⌿(22⍴2)⊤C)<+⌿0≠(5⍴10)⊤C)/C←⍳10000
%Y A239751 Cf. A000120, A051596, A055640.
%K A239751 nonn,base,easy
%O A239751 1,1
%A A239751 _Michael Turniansky_, Mar 26 2014