OFFSET
0,3
LINKS
Robert Israel, Table of n, a(n) for n = 0..10000
FORMULA
Should be asymptotic to n.
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
KEYWORD
nonn,base
AUTHOR
Benoit Cloitre, Apr 27 2003
STATUS
approved