A365010 E.g.f. satisfies A(x) = 1 + x*exp(-x)*A(x)^3.

1, 1, 4, 39, 596, 12365, 324714, 10329655, 386190328, 16597810233, 806356830230, 43700423019011, 2613919719004692, 171053575111641157, 12156558707970920866, 932424974682447304815, 76772968644326739801584, 6754080601542663692950769

Offset

0,3

Links

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

Formula

a(n) = n! * Sum_{k=0..n} (-k)^(n-k) * A001764(k)/(n-k)!.

Maple

A365010 := proc(n)
    add( (-k)^(n-k)*A001764(k)/(n-k)!, k=0..n) ;
    %*n! ;
end proc:
seq(A365010(n), n=0..80); # R. J. Mathar, Aug 16 2023

Prog

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

Crossrefs

Cf. A295239, A302397, A365011.

Cf. A001764, A364983.

Sequence in context: A177775 A364981 A192935 * A024055 A361544 A178920

Adjacent sequences: A365007 A365008 A365009 * A365011 A365012 A365013

Keyword

nonn

Author

Seiichi Manyama, Aug 15 2023

Status

approved