A213232
G.f. satisfies: A(x) = 1/(1 - x/A(-x*A(x)^9)^3).
Original entry on oeis.org
1, 1, 4, 28, 215, 1983, 19789, 213698, 2426851, 28661509, 348287354, 4322627557, 54508747790, 695534616050, 8953637420349, 116002300640637, 1509724588732027, 19707310304585212, 257698683361191598, 3372154116182404890, 44121356408759264549
Offset: 0
G.f.: A(x) = 1 + x + 4*x^2 + 28*x^3 + 215*x^4 + 1983*x^5 + 19789*x^6 +...
Related expansions:
A(x)^9 = 1 + 9*x + 72*x^2 + 624*x^3 + 5661*x^4 + 54621*x^5 + 555837*x^6 +...
1/A(-x*A(x)^9)^3 = 1 + 3*x + 21*x^2 + 154*x^3 + 1446*x^4 + 14511*x^5 + 158838*x^6 +...
-
{a(n)=local(A=1+x+x*O(x^n)); for(i=1, n, A=1/(1-x/subst(A^3, x, -x*subst(A^9, x, x+x*O(x^n)))) ); polcoeff(A, n)}
for(n=0, 30, print1(a(n), ", "))
A213233
G.f. satisfies: A(x) = 1/(1 - x/A(-x*A(x)^10)^4).
Original entry on oeis.org
1, 1, 5, 39, 345, 3512, 38431, 451620, 5587237, 72275004, 968509140, 13361356169, 188704259571, 2716467168169, 39716842554828, 588125693790055, 8800638181341593, 132838773216409675, 2019626662710709088, 30891440565153652705, 474899505740289874276
Offset: 0
G.f.: A(x) = 1 + x + 5*x^2 + 39*x^3 + 345*x^4 + 3512*x^5 + 38431*x^6 +...
Related expansions:
A(x)^10 = 1 + 10*x + 95*x^2 + 960*x^3 + 10095*x^4 + 111212*x^5 +...
1/A(-x*A(x)^10)^4 = 1 + 4*x + 30*x^2 + 256*x^3 + 2605*x^4 + 28484*x^5 +...
-
{a(n)=local(A=1+x+x*O(x^n)); for(i=1, n, A=1/(1-x/subst(A^4, x, -x*subst(A^10, x, x+x*O(x^n)))) ); polcoeff(A, n)}
for(n=0, 30, print1(a(n), ", "))
A213227
G.f. satisfies: A(x) = 1/(1 - x/A(-x*A(x)^6)).
Original entry on oeis.org
1, 1, 2, 8, 35, 181, 1042, 6301, 39435, 249744, 1585386, 10027385, 62696192, 385398251, 2322152120, 13727653882, 80274175978, 472701550856, 2883417403654, 18796497074750, 132728456810968, 995480740265410, 7605881152587204, 56821415293287735, 403362682583930224
Offset: 0
G.f.: A(x) = 1 + x + 2*x^2 + 8*x^3 + 35*x^4 + 181*x^5 + 1042*x^6 +...
Related expansions:
A(x)^6 = 1 + 6*x + 27*x^2 + 128*x^3 + 645*x^4 + 3462*x^5 + 19823*x^6 +...
1/A(-x*A(x)^6) = 1 + x + 5*x^2 + 20*x^3 + 108*x^4 + 638*x^5 + 3889*x^6 +...
-
{a(n)=local(A=1+x+x*O(x^n)); for(i=1, n, A=1/(1-x/subst(A, x, -x*subst(A^6, x, x+x*O(x^n)))) ); polcoeff(A, n)}
for(n=0, 30, print1(a(n), ", "))
Comments