A249304 Number of zeros in row n of triangle A249133.

0, 0, 1, 1, 3, 5, 5, 3, 7, 13, 13, 11, 13, 15, 13, 7, 15, 29, 29, 27, 29, 31, 29, 23, 29, 39, 37, 31, 33, 35, 29, 15, 31, 61, 61, 59, 61, 63, 61, 55, 61, 71, 69, 63, 65, 67, 61, 47, 61, 87, 85, 79, 81, 83, 77, 63, 73, 91, 85, 71, 73, 75, 61, 31, 63, 125, 125

Offset

0,5

Comments

a(n) = (number of even terms in row n of triangle A249095) = A023416(A249184(n)) = A055641(A249183(n)).

Links

Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Formula

a(n) = A048967(n) + A048967(n-1) for n > 0.

Mathematica

Join[{0}, Plus @@@ Partition[Table[n + 1 - 2^DigitCount[n, 2, 1], {n, 0, 100}], 2, 1]] (* Amiram Eldar, Jul 28 2023 *)

Prog

(Haskell)
a249304 n = if n == 0 then 0 else a048967 n + a048967 (n - 1)

Crossrefs

Cf. A249133, A048967, A249095, A023416, A055641, A249183, A249184.

Sequence in context: A282177 A184593 A328154 * A333906 A306224 A189202

Adjacent sequences: A249301 A249302 A249303 * A249305 A249306 A249307

Keyword

nonn

Author

Reinhard Zumkeller, Nov 14 2014

Status

approved