OFFSET
0,4
COMMENTS
The sequence is well-defined, see Problem 5 of IMO 2019.
LINKS
International Mathematical Olympiad, Problem 5 of IMO 2019.
PROG
(PARI) A326732(n) = my(b=binary(n)); 2*sum(i=1, #b, i*b[i]) - vecsum(b)^2;
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Max Alekseyev, Jul 22 2019
STATUS
approved