A362798 E.g.f. satisfies A(x) = 1/(1-x)^(A(x)^(x^2)).

1, 1, 2, 6, 48, 360, 2820, 31500, 393568, 5111568, 78491520, 1345893120, 24286008384, 483716087712, 10526811186528, 241867328844960, 5957816820215040, 157412355684364800, 4380674530640290560, 128826276098289179904, 4010282529115722232320

Offset

0,3

Links

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

Eric Weisstein's World of Mathematics, Lambert W-Function.

Formula

E.g.f.: exp( -LambertW(x^2 * log(1-x)) / x^2 ) = 1/(1-x)^exp( -LambertW(x^2 * log(1-x)) ).

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

Prog

(PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(1/(1-x)^exp(-lambertw(x^2*log(1-x)))))

Crossrefs

Cf. A052813, A362796.

Cf. A362795, A362800.

Sequence in context: A092143 A281027 A271961 * A239836 A052593 A358065

Adjacent sequences: A362795 A362796 A362797 * A362799 A362800 A362801

Keyword

nonn

Author

Seiichi Manyama, May 04 2023

Status

approved