A371391 Expansion of (1/x) * Series_Reversion( x * (1-x) / (1+2*x)^2 ).

1, 5, 34, 269, 2326, 21314, 203428, 2000957, 20142862, 206524790, 2149261852, 22644243218, 241061343004, 2589022298084, 28019201644744, 305254481274269, 3345077342003134, 36846738570089774, 407754101877613804, 4531049315843043974, 50538820796852529364

Offset

0,2

Links

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

Index entries for reversions of series

Formula

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

a(n) = (1/(n+1)) * [x^n] ( (1+2*x)^2 / (1-x) )^(n+1). - Seiichi Manyama, Jul 31 2025

a(n) ~ 2^(2*n-2) * 3^(n+2) / (sqrt(Pi) * n^(3/2)). - Vaclav Kotesovec, Jul 31 2025

Mathematica

Table[Sum[2^k*Binomial[2*(n+1), k]*Binomial[2*n-k, n-k]/(n+1), {k, 0, n}], {n, 0, 30}] (* Vaclav Kotesovec, Jul 31 2025 *)

Prog

(PARI) my(N=30, x='x+O('x^N)); Vec(serreverse(x*(1-x)/(1+2*x)^2)/x)
(PARI) a(n) = sum(k=0, n, 2^k*binomial(2*(n+1), k)*binomial(2*n-k, n-k))/(n+1);

Crossrefs

Cf. A047891, A371392.

Sequence in context: A387475 A243659 A365183 * A058248 A116435 A292877

Adjacent sequences: A371388 A371389 A371390 * A371392 A371393 A371394

Keyword

nonn

Author

Seiichi Manyama, Mar 21 2024

Status

approved