A213628 G.f. satisfies: A(x) = 1 - (x^2/A(x)) / A( x^2/A(x) ).
1, 1, 3, 14, 85, 616, 5072, 46013, 450739, 4702265, 51731956, 595874703, 7147366614, 88905147730, 1143097097833, 15152617826426, 206646826047563, 2894398418226395, 41577147999077079, 611779190051375147, 9211548488261257610, 141802624561414800815
Offset: 1
Keywords
Examples
G.f.: A(x) = x + x^2 + 3*x^3 + 14*x^4 + 85*x^5 + 616*x^6 + 5072*x^7 +... Related expansions: x^2/A(x) = x - x^2 - 2*x^3 - 9*x^4 - 56*x^5 - 420*x^6 - 3572*x^7 -... A(x^2/A(x)) = x - x^3 - 7*x^4 - 50*x^5 - 395*x^6 - 3436*x^7 -... A(x) = x^2/Series_Reversion(G(x)) where G(x) is the g.f. of A213591: G(x) = x + x^2 + 4*x^3 + 24*x^4 + 178*x^5 + 1512*x^6 + 14152*x^7 +... such that G(x - G(x)^2) = x.
Programs
-
PARI
{a(n)=local(A=x,G=x); if(n<1, 0, for(i=1, n, G=serreverse(x - G^2+x*O(x^n)));A=x^2/(x-G^2);polcoeff(A, n))} for(n=1,25,print1(a(n),", "))