OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..16383
FORMULA
a(2^k) = k*2^k. - Chai Wah Wu, Dec 24 2024
PROG
(Python)
for n in range(300):
c = 0
b = int(n**n)
while b>0:
c += 1-(b&1)
b//=2
print( c, end=", ")
(PARI) vector(66, n, b=binary((n-1)^(n-1)); sum(j=1, #b, 1-b[j])) /* Joerg Arndt, Jul 21 2012 */
CROSSREFS
KEYWORD
nonn,base,changed
AUTHOR
Alex Ratushnyak, Jul 21 2012
STATUS
approved