A386865 a(n) = Sum_{k=0..n} 2^(n-k) * binomial(2*n+2,k) * binomial(2*n-k-1,n-k).

1, 6, 51, 496, 5130, 54894, 600103, 6657312, 74646702, 843819580, 9599776494, 109776491664, 1260666279964, 14528980409454, 167951183468655, 1946529575164864, 22611104963042646, 263175370423429428, 3068541416792813338, 35834296592951011680, 419059482092284948908

Offset

0,2

Links

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

Formula

a(n) = [x^n] (1+x)^(2*n+2)/(1-2*x)^n.

a(n) = [x^n] 1/((1-x)^3 * (1-3*x)^n).

a(n) = Sum_{k=0..n} 3^k * (-2)^(n-k) * binomial(2*n+2,k) * binomial(n-k+2,n-k).

a(n) = Sum_{k=0..n} 3^k * binomial(n+k-1,k) * binomial(n-k+2,n-k).

a(n) ~ 2^(2*n+2) * 3^(n+3) / (125*sqrt(Pi*n)). - Vaclav Kotesovec, Aug 06 2025

Mathematica

Table[Sum[(-1)^k*(k+1)*(k+2)*2^(k-1)*3^(n-k)* Binomial[2*n+2, n+k+2], {k, 0, n}], {n, 0, 20}] (* Vaclav Kotesovec, Aug 06 2025 *)

Prog

(PARI) a(n) = sum(k=0, n, 2^(n-k)*binomial(2*n+2, k)*binomial(2*n-k-1, n-k));

Crossrefs

Cf. A383888, A386862.

Cf. A386835.

Sequence in context: A202754 A363112 A180901 * A199685 A225615 A002295

Adjacent sequences: A386862 A386863 A386864 * A386866 A386867 A386868

Keyword

nonn

Author

Seiichi Manyama, Aug 06 2025

Status

approved