A357191 a(n) = n! * Sum_{k=0..floor(n/2)} k^n/k!.

1, 0, 2, 6, 216, 2040, 111240, 2164680, 159391680, 5247305280, 491431600800, 24437592194400, 2800955712804480, 195393943295591040, 26699221909806526080, 2479967110139382864000, 396503602252401676032000, 47167550656581451928832000

Offset

0,3

Links

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

Formula

E.g.f.: Sum_{k>=0} (k * x)^(2 * k) / (k! * (1 - k * x)).

Prog

(PARI) a(n) = n!*sum(k=0, n\2, k^n/k!);
(PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(sum(k=0, N, (k*x)^(2*k)/(k!*(1-k*x)))))

Crossrefs

Cf. A256016, A357192.

Cf. A352981, A357193.

Sequence in context: A285101 A361086 A176782 * A013083 A110387 A158682

Adjacent sequences: A357188 A357189 A357190 * A357192 A357193 A357194

Keyword

nonn

Author

Seiichi Manyama, Sep 17 2022

Status

approved