|
|
A308030
|
|
G.f. A(x) satisfies: A(x) = x + x^2 + x^3 * (1 + A(A(x))).
|
|
2
|
|
|
1, 1, 1, 1, 2, 4, 8, 18, 45, 122, 350, 1052, 3313, 10933, 37739, 135865, 508545, 1973717, 7926795, 32895354, 140894024, 622160220, 2829323210, 13235526027, 63620528705, 313909404040, 1588405927920, 8235905545581, 43724990832997, 237527663672208, 1319398402129845
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,5
|
|
COMMENTS
|
Shifts left 3 places under COMPOSE transform.
|
|
LINKS
|
|
|
MATHEMATICA
|
terms = 31; A[_] = 0; Do[A[x_] = x + x^2 + x^3 (1 + A[A[x]]) + O[x]^(terms + 1) // Normal, terms + 1]; Rest[CoefficientList[A[x], x]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|