A082481 Number of 1's in binary representation of C(2n,n).

1, 1, 2, 2, 3, 6, 6, 6, 6, 11, 9, 9, 9, 13, 10, 16, 14, 10, 16, 20, 14, 20, 16, 29, 26, 24, 22, 30, 24, 20, 25, 25, 30, 29, 33, 37, 35, 40, 35, 39, 37, 40, 42, 43, 36, 44, 46, 48, 48, 41, 43, 46, 50, 58, 51, 52, 52, 50, 53, 56, 54, 48, 59, 60, 57, 64, 61, 61, 64, 66, 64, 72, 73

Offset

0,3

Links

Robert Israel, Table of n, a(n) for n = 0..10000

Formula

Should be asymptotic to n.

a(n) = A000120(A000984(n)). - Michel Marcus, Mar 27 2018

Maple

seq(convert(convert(binomial(2*n, n), base, 2), `+`), n=0..100); # Robert Israel, Mar 27 2018

Mathematica

Table[DigitCount[Binomial[2n, n], 2, 1], {n, 0, 90}] (* Harvey P. Dale, Jul 20 2023 *)

Prog

(PARI) a(n)=sum(k=1, length(binary(binomial(2*n, n))), component(binary(binomial(2*n, n)), k))
(PARI) a(n) = hammingweight(binomial(2*n, n)); \\ Michel Marcus, Mar 27 2018

Crossrefs

Cf. A000120, A000984.

Sequence in context: A068424 A298484 A139359 * A136573 A121457 A093784

Adjacent sequences: A082478 A082479 A082480 * A082482 A082483 A082484

Keyword

nonn,base

Author

Benoit Cloitre, Apr 27 2003

Status

approved