A239751 Numbers whose number of nonzero binary digits is less than their number of nonzero decimal digits.

16, 32, 64, 128, 129, 132, 136, 144, 192, 256, 257, 258, 264, 272, 288, 384, 512, 513, 514, 516, 528, 544, 576, 768, 1024, 1025, 1026, 1028, 1032, 1056, 1088, 1152, 1153, 1154, 1156, 1168, 1184, 1216, 1280, 1281, 1282, 1284, 1288, 1296, 1312, 1344, 1536, 1537, 1538, 1544, 1552, 1568, 1664

Offset: 1

Author

Michael Turniansky, Mar 26 2014

Keywords

• nonn
• base
• easy

Comments

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".

Links

• Michael Turniansky, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A000120, A051596, A055640.

Programs

APL

((+⌿(22⍴2)⊤C)<+⌿0≠(5⍴10)⊤C)/C←⍳10000

Mathematica

Select[Range[1664], Less @@ Total /@ Sign /@ IntegerDigits[#, {2, 10}] &] (* Giovanni Resta, Mar 26 2014 *)

Formula

n such that A000120(n)<A055640(n).