A294119 Expansion of e.g.f.: exp(2*((1+x)^2 - 1)).

1, 4, 20, 112, 688, 4544, 31936, 236800, 1841408, 14943232, 126063616, 1101983744, 9954734080, 92714156032, 888502796288, 8746003922944, 88294183469056, 912920984944640, 9655688415674368, 104353064578711552, 1151244577906098176, 12953223477921316864

Offset

0,2

Links

Seiichi Manyama, Table of n, a(n) for n = 0..655

Formula

E.g.f.: exp(2*((1+x)^2 - 1)).

a(n) ~ 2^(n - 1/2) * n^(n/2) * exp(-1 + 2*sqrt(n) - n/2). - Vaclav Kotesovec, Oct 23 2017

a(n) = 4*a(n-1)+4*(n-1)*a(n-2). - Robert Israel, Jun 16 2020

Maple

f:= rectoproc({a(n)=4*a(n-1)+4*(n-1)*a(n-2), a(0)=1, a(1)=4}, a(n), remember):
map(f, [$0..30]); # Robert Israel, Jun 16 2020

Mathematica

nmax = 20; CoefficientList[Series[E^(2*((1+x)^2 - 1)), {x, 0, nmax}], x] * Range[0, nmax]! (* Vaclav Kotesovec, Oct 23 2017 *)

Prog

(PARI) N=66; x='x+O('x^N); Vec(serlaplace(exp(2*((1+x)^2-1))))

Crossrefs

Column k=2 of A294118.

Sequence in context: A212326 A192624 A209200 * A245375 A362223 A108447

Adjacent sequences: A294116 A294117 A294118 * A294120 A294121 A294122

Keyword

nonn

Author

Seiichi Manyama, Oct 23 2017

Status

approved