A365714 Sum of reversing binary value of n (A065620) and its Dirichlet inverse.
2, 0, 0, 4, 0, -4, 0, 8, 1, -12, 0, -4, 0, 12, 6, 16, 0, -30, 0, -12, -6, 28, 0, -8, 9, 20, 15, 12, 0, -32, 0, 32, -14, -60, -18, -28, 0, 60, -10, -24, 0, 64, 0, 28, 61, -52, 0, -16, 9, 18, 30, 20, 0, -66, -42, 24, -30, -44, 0, -20, 0, 44, -77, 64, -30, -96, 0, -60, 26, 160, 0, -56, 0, 116, 39, 60, 42, -96, 0, -48, 89
Offset: 1
Keywords
Links
- Antti Karttunen, Table of n, a(n) for n = 1..16384
Programs
-
PARI
A065620(n, c=1) = sum(i=0, logint(n+!n, 2), if(bittest(n, i), (-1)^c++<A065620 by M. F. Hasler memoA365713 = Map(); A365713(n) = if(1==n,1,my(v); if(mapisdefined(memoA365713,n,&v), v, v = -sumdiv(n,d,if(d
A065620(n/d)*A365713(d),0)); mapput(memoA365713,n,v); (v))); A365714(n) = (A065620(n)+A365713(n));