A065878 Numbers which are not an integer multiple of their number of binary 1's.
3, 5, 7, 9, 11, 13, 14, 15, 17, 19, 22, 23, 25, 26, 27, 28, 29, 30, 31, 33, 35, 37, 38, 39, 41, 43, 44, 45, 46, 47, 49, 50, 51, 52, 53, 54, 56, 57, 58, 59, 61, 62, 63, 65, 67, 70, 71, 73, 74, 75, 76, 77, 78, 79, 82, 83, 85, 86, 87, 88, 89, 90, 91, 93, 94, 95, 97, 98, 99, 100
Offset: 1
Examples
5 is in the sequence since 5 = 101_2 and 5 is not a multiple of 1 + 0 + 1 = 2.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harry J. Smith)
Crossrefs
Programs
-
Mathematica
Select[Range[100],!IntegerQ[#/Total[IntegerDigits[#,2]]]&] (* Harvey P. Dale, Apr 20 2011 *)
-
PARI
isok(k) = k % hammingweight(k); \\ Amiram Eldar, Aug 04 2025