login
A317837
a(n) = Sum_{d|n, d<n} A002487(d).
7
0, 1, 1, 2, 1, 4, 1, 3, 3, 5, 1, 7, 1, 5, 6, 4, 1, 10, 1, 9, 6, 7, 1, 10, 4, 7, 7, 9, 1, 16, 1, 5, 8, 7, 7, 17, 1, 9, 8, 13, 1, 20, 1, 13, 14, 9, 1, 13, 4, 15, 8, 13, 1, 22, 9, 13, 10, 9, 1, 26, 1, 7, 18, 6, 9, 22, 1, 13, 10, 23, 1, 24, 1, 13, 17, 17, 9, 26, 1, 17, 15, 13, 1, 34, 9, 15, 10, 19, 1, 40, 9, 17, 8, 11, 11
OFFSET
1,4
FORMULA
a(n) = Sum_{d|n, d<n} A002487(d).
a(n) = A317838(n) - A002487(n).
a(n) = A001222(A293216(n)).
PROG
(PARI)
A002487(n) = { my(a=1, b=0); while(n>0, if(bitand(n, 1), b+=a, a+=b); n>>=1); (b); }; \\ From A002487
A317837(n) = sumdiv(n, d, (d<n)*A002487(d));
KEYWORD
nonn
AUTHOR
Antti Karttunen, Aug 09 2018
STATUS
approved