A107782 In binary representation of n: (number of zeros) minus (number of blocks of contiguous zeros).

0, 0, 0, 0, 1, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 3, 2, 1, 1, 1, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 4, 3, 2, 2, 2, 1, 1, 1, 2, 1, 0, 0, 1, 0, 0, 0, 3, 2, 1, 1, 1, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 5, 4, 3, 3, 3, 2, 2, 2, 3, 2, 1, 1, 2, 1, 1, 1, 3, 2, 1, 1, 1, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 4, 3, 2, 2, 2, 1, 1, 1, 2

Offset: 0

Author

Reinhard Zumkeller, May 25 2005

Keywords

• nonn

Comments

a(n) = A023416(n) - A087116(n); a(A003754(n)) = 0.

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
• Index entries for sequences related to binary expansion of n

Crossrefs

Cf. A007088, A107345.

Cf. A056973. - R. J. Mathar, Aug 24 2008

Cf. A023416, A087116, A003754.

Programs

Haskell

a107782 n = a023416 n - a087116 n  -- Reinhard Zumkeller, Mar 31 2015