A128319 G.f.: A(x) = 1+x*(1+2x*(1+3x*(...(1+n*x*(...)^3)^3...)^3)^3)^3.

1, 1, 6, 66, 1034, 20790, 507600, 14546196, 478095264, 17722127700, 731393039376, 33262113690576, 1652889277811448, 89115877932595848, 5181554275409183904, 323216011162774715904, 21531610593372148573824

Offset

0,3

Comments

(a(n)/n!)^(1/n) tends to 4.26315... - Vaclav Kotesovec, Oct 11 2020

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..360

Example

G.f.: A(x) = 1 + x*B(x)^3; B(x) = 1 + 2*x*C(x)^3; C(x) = 1 + 3*x*D(x)^3; D(x) = 1 + 4*x*E(x)^3; E(x) = 1 + 5*x*F(x)^3; F(x) = 1 + 6*x*G(x)^3; ...
where the respective sequences begin:
A=[1,1,6,66,1034,20790,507600,14546196,478095264,...];
B=[1,2,18,270,5454,135936,3992544,134386344,5088220200,...];
C=[1,3,36,684,16932,504540,17367840,673851600,28994802120,...];
D=[1,4,60,1380,40460,1404000,55499040,2443032360,118003755960,...];
E=[1,5,90,2430,82350,3262770,145741680,7183818180,385393611960,...];
F=[1,6,126,3906,150234,6693120,333506880,18208871856,1075094932464,...];
G=[1,7,168,5880,253064,12523896,688855104,41282607744,2661610538160,..];
H=[1,8,216,8424,401112,21833280,1314118080,85783244400,5998813428240,..];

Prog

(PARI) {a(n)=local(A=1+(n+1)*x); for(k=0, n, A=1+(n-k+1)*x*A^3 +x*O(x^n)); polcoeff(A, n)}

Crossrefs

Cf. A128318.

Sequence in context: A211824 A360976 A360236 * A174496 A008548 A090358

Adjacent sequences: A128316 A128317 A128318 * A128320 A128321 A128322

Keyword

nonn

Author

Paul D. Hanna, Mar 07 2007

Status

approved