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
Keywords
Crossrefs
Partial sums of A192655.
Programs
-
Mathematica
Table[Sum[Floor[Sqrt[Binomial[2k,k]]],{k,0,n}],{n,0,100}]
-
Maxima
makelist(sum(floor(sqrt(binomial(2*k,k))),k,0,n),n,0,24);
Formula
a(n) = Sum_{k=0..n} floor(sqrt(binomial(2*k,k))).