A192657 Convolution of the Floor-Sqrt transform of central binomial coefficients.

1, 2, 5, 12, 28, 62, 138, 300, 646, 1378, 2919, 6148, 12890, 26914, 56010, 116224, 240567, 496854, 1024202, 2107660, 4330651, 8886094, 18210883, 37278902, 76234264, 155750644, 317932560, 648477346, 1321706751, 2692024172, 5479576436, 11146993980, 22663554750, 46054591760

Offset

0,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..87

Formula

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A202604 A118898 A111586 * A320590 A006979 A019301

Adjacent sequences: A192654 A192655 A192656 * A192658 A192659 A192660

Keyword

nonn

Author

Emanuele Munarini, Jul 07 2011

Status

approved