OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harry J. Smith)
EXAMPLE
5 is in the sequence since 5 = 101_2 and 5 is not a multiple of 1 + 0 + 1 = 2.
MATHEMATICA
Select[Range[100], !IntegerQ[#/Total[IntegerDigits[#, 2]]]&] (* Harvey P. Dale, Apr 20 2011 *)
PROG
(PARI) isok(k) = k % hammingweight(k); \\ Amiram Eldar, Aug 04 2025
CROSSREFS
KEYWORD
base,nonn,easy
AUTHOR
Henry Bottomley, Nov 26 2001
STATUS
approved
