A292601 - OEIS

A292601

a(n) = n - A292600(n).

0, 1, 1, 2, 1, 2, 4, 5, 1, 2, 4, 5, 8, 9, 9, 10, 1, 2, 4, 5, 8, 9, 9, 10, 16, 17, 17, 18, 17, 18, 20, 21, 1, 2, 4, 5, 8, 9, 9, 10, 16, 17, 17, 18, 17, 18, 20, 21, 32, 33, 33, 34, 33, 34, 36, 37, 33, 34, 36, 37, 40, 41, 41, 42, 1, 2, 4, 5, 8, 9, 9, 10, 16, 17, 17, 18, 17, 18, 20, 21, 32, 33, 33, 34, 33, 34, 36, 37, 33, 34, 36, 37, 40, 41, 41, 42, 64, 65, 65

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,4

LINKS

Antti Karttunen, Table of n, a(n) for n = 0..16383

Index entries for sequences related to binary expansion of n

FORMULA

a(n) = n - A292600(n) = n - A006068(floor(n/2)).

MATHEMATICA

Table[n - If[n < 2, 0, BitXor @@ Table[Floor[#/2^m], {m, 0, Floor@ Log2@ #}] &@ Floor[n/2]], {n, 0, 98}] (* Michael De Vlieger, Sep 21 2017 *)

PROG

(Python)