|
| |
|
|
A138292
|
|
E.g.f. satisfies: A(x) = exp(x*A(x^2)).
|
|
1
| |
|
|
1, 1, 1, 7, 25, 121, 841, 9871, 80977, 869905, 10776241, 131366071, 1821918121, 27671299657, 460068491065, 8716820294911, 162728020119841, 3217989767498401, 69343322972016097, 1533322325194196455
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
COMMENTS
| E.g.f: A(x) = 1 + x + 1/2*x^2 + 7/6*x^3 + 25/24*x^4 + 121/120*x^5 +...
Log(A(x)) = x + x^3 + 1/2*x^5 + 7/6*x^7 + 25/24*x^9 + 121/120*x^11 +...
|
|
|
PROG
| (PARI) {a(n)=local(A=1); for(i=0, n-1, A=exp(x*subst(A, x, x^2+x*O(x^n)))); n!*polcoeff(A, n)}
|
|
|
CROSSREFS
| Sequence in context: A199893 A129791 A141626 * A138738 A057573 A082651
Adjacent sequences: A138289 A138290 A138291 * A138293 A138294 A138295
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Paul D. Hanna (pauldhanna(AT)juno.com), Mar 13 2008
|
| |
|
|
