A308032 G.f. A(x) satisfies: A(x) = x + x^2 + x^3 + x^4 + x^5 * (1 + A(A(x))).

1, 1, 1, 1, 1, 1, 2, 4, 8, 16, 32, 66, 143, 333, 838, 2250, 6320, 18275, 53925, 161957, 495898, 1554159, 5008758, 16662249, 57311722, 203662894, 745602490, 2801326407, 10760995574, 42141768601, 167955587806, 680843078327, 2808084199432, 11793793850210, 50489830489534

Offset

1,7

Comments

Shifts left 5 places under COMPOSE transform.

Links

Table of n, a(n) for n=1..35.

Mathematica

terms = 35; A[_] = 0; Do[A[x_] = x + x^2 + x^3 + x^4 + x^5 (1 + A[A[x]]) + O[x]^(terms + 1) // Normal, terms + 1]; Rest[CoefficientList[A[x], x]]

Crossrefs

Cf. A030266, A030277, A308030, A308031.

Sequence in context: A367661 A303023 A370340 * A100138 A336010 A180208

Adjacent sequences: A308029 A308030 A308031 * A308033 A308034 A308035

Keyword

nonn

Author

Ilya Gutkovskiy, May 10 2019

Status

approved