A192656 Partial sums of the Floor-Sqrt transform of central binomial coefficients.

1, 2, 4, 8, 16, 31, 61, 119, 232, 452, 881, 1720, 3364, 6588, 12921, 25375, 49891, 98198, 193461, 381464, 752740, 1486400, 2936951, 5806346, 11485043, 22728290, 44997518, 89121654, 176578446, 349977599, 693873777, 1376096873, 2729841361, 5416740769, 10750880013, 21342682400

Offset

0,2

Links

Table of n, a(n) for n=0..35.

Formula

a(n) = Sum_{k=0..n} floor(sqrt(binomial(2*k,k))).

Mathematica

Table[Sum[Floor[Sqrt[Binomial[2k, k]]], {k, 0, n}], {n, 0, 100}]

Prog

(Maxima) makelist(sum(floor(sqrt(binomial(2*k, k))), k, 0, n), n, 0, 24);

Crossrefs

Partial sums of A192655.

Sequence in context: A104993 A223940 A189076 * A128761 A332726 A239557

Adjacent sequences: A192653 A192654 A192655 * A192657 A192658 A192659

Keyword

nonn

Author

Emanuele Munarini, Jul 07 2011

Status

approved