|
| |
|
|
A088715
|
|
G.f. satisfies: A(x*g(x)) = g(x) where g(x) is the g.f. of A088716.
|
|
2
| |
|
|
1, 1, 2, 7, 36, 240, 1926, 17815, 184916, 2116498, 26391700, 355405934, 5134778584, 79178537346, 1297633495518, 22522717498167, 412754532495252, 7965288555078018, 161475849044919996, 3431346397643014818
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
FORMULA
| G.f.: Coefficient of x^n in A(x)^(n+1)/(n+1) = coefficient of x^n in A(x)^(n+2) = A088716(n).
G.f. satisfies: A(x) = exp( Sum_{n>=1} x^n/(1 - x*[A'(x)/A(x)])^n/n ). [From Paul D. Hanna (pauldhanna(AT)juno.com), Aug 31 2009]
|
|
|
PROG
| (PARI) {a(n)=local(A=1+x+x*O(x^n)); for(i=1, n, A=exp(sum(k=1, n, (1-x*deriv(log(A)))^(-k)*x^k/k))); polcoeff(A, n)} [From Paul D. Hanna (pauldhanna(AT)juno.com), Aug 31 2009]
|
|
|
CROSSREFS
| Cf. A088716.
Sequence in context: A018954 A019030 A119736 * A088313 A201197 A185754
Adjacent sequences: A088712 A088713 A088714 * A088716 A088717 A088718
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Paul D. Hanna (pauldhanna(AT)juno.com), Oct 12 2003
|
| |
|
|
