OFFSET
1,2
LINKS
Karl-Heinz Hofmann, Table of n, a(n) for n = 1..10000
MATHEMATICA
DigitCount[#, 2, 1] & /@ Select[Range[125], CompositeQ] (* Amiram Eldar, Oct 03 2022 *)
PROG
(Python)
from sympy import isprime
print([bin(k)[2:].count("1") for k in range(4, 123) if not isprime(k)])
(PARI) forcomposite (k=0, 120, print1 (hammingweight(k), ", ")) \\ Hugo Pfoertner, Oct 03 2022
CROSSREFS
KEYWORD
base,nonn,easy
AUTHOR
Karl-Heinz Hofmann, Oct 02 2022
STATUS
approved