A191799 G.f. A(x) satisfies: A(x) = 1 + Sum_{n>=1} x^n*A(x)^(n!).

1, 1, 2, 5, 17, 83, 686, 12702, 618670, 86594397, 34022042977, 39695020615741, 145648823360677102, 1642319452761786618544, 65668928064214050537574257, 8555753375062844432074207650070, 4182704217109744221309611775526547951

Offset

0,3

Links

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

Example

G.f.: A(x) = 1 + x + 2*x^2 + 5*x^3 + 17*x^4 + 83*x^5 + 686*x^6 +...
The g.f. satisfies:
A(x) = 1 + x*A(x) + x^2*A(x)^2 + x^3*A(x)^6 + x^4*A(x)^24 + x^5*A(x)^120 + x^6*A(x)^720 + x^7*A(x)^5040 +...+ x^n*A(x)^(n!) +...

Prog

(PARI) {a(n)=local(A=1+x); for(i=1, n, A=1+sum(m=1, n, x^m*(A+x*O(x^n))^(m!))); polcoeff(A, n)}

Crossrefs

Sequence in context: A363002 A032262 A144259 * A079805 A162038 A162039

Adjacent sequences: A191796 A191797 A191798 * A191800 A191801 A191802

Keyword

nonn

Author

Paul D. Hanna, Jun 19 2011

Status

approved