|
Search: id:A112936
|
|
|
| A112936 |
|
INVERT transform (with offset) of triple factorials (A008544), where g.f. satisfies: A(x) = 1 + x*[d/dx x*A(x)^3]/A(x)^3. |
|
+0
10
|
|
| 1, 1, 3, 15, 111, 1131, 14943, 243915, 4742391, 106912131, 2739347103, 78569371275, 2492748594471, 86650852740531, 3274367635513263, 133625238021647835, 5856377114106629751, 274320168321004350531
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
FORMULA
|
G.f. satisfies: A(x) = 1+x + 3*x^2*[d/dx A(x)]/A(x) (log derivative). G.f.: A(x) = 1+x +3*x^2/(1-5*x -3*2*2*x^2/(1-11*x -3*3*5*x^2/(1-17*x -3*4*8*x^2/(1-23*x -... -3*n*(3*n-4)*x^2/(1-(6*n-1)*x -...)))) (continued fraction). G.f.: A(x) = 1/(1-x/(1 -2*x/(1-3*x/(1 -5*x/(1-6*x/(1 -8*x/(1-9*x/(1 -...)))))))) (continued fraction).
|
|
EXAMPLE
|
A(x) = 1 + x + 3*x^2 + 15*x^3 + 111*x^4 + 1131*x^5 + 14943*x^6 +...
1/A(x) = 1 - x - 2*x^2 - 10*x^3 - 80*x^4 - 880*x^5 -...-A008544(n)*x^(n+1)-...
|
|
PROGRAM
|
(PARI) {a(n)=local(F=1+x+x*O(x^n)); for(i=1, n, F=1+x+3*x^2*deriv(F)/F); return(polcoeff(F, n, x))}
|
|
CROSSREFS
|
Cf. A008544, A112937 (log derivative); A112934, A112935, A112938, A112939, A112940, A112941, A112942, A112943.
Sequence in context: A089468 A109498 A142967 this_sequence A001063 A130168 A089945
Adjacent sequences: A112933 A112934 A112935 this_sequence A112937 A112938 A112939
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Oct 09 2005
|
|
|
Search completed in 0.002 seconds
|
