|
Search: id:A112487
|
|
| |
|
| 1, 2, 10, 82, 938, 13778, 247210, 5240338, 128149802, 3551246162, 109979486890, 3764281873042, 141104799067178, 5749087305575378, 252969604725106090, 11955367835505775378, 603967991604199335722, 32479636694930586142802
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
FORMULA
|
a(n)=sum(A112486(n, m), m=0..n), n>=0.
a(n) = 2*A032188(n+1), n>0. - Vladeta Jovovic (vladeta(AT)eunet.rs), Jul 11 2007
Contribution from Paul D. Hanna (pauldhanna(AT)juno.com), Jun 30 2009: (Start)
E.g.f. A(x) satisfies: A'(x) = A(x)^2 + A(x)^3.
E.g.f. A(x) satisfies: A(x) = exp( Integral[A(x) + A(x)^2]dx ) with A(0)=1. (End)
|
|
PROGRAM
|
(PARI) {a(n)=local(A=1+x); for(i=1, n, A=exp(intformal(A+A^2)+x*O(x^n))); n!*polcoeff(A, n)} [From Paul D. Hanna (pauldhanna(AT)juno.com), Jun 30 2009]
|
|
CROSSREFS
|
Cf. A032034. [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Aug 15 2008]
Sequence in context: A063902 A088351 A062396 this_sequence A089469 A111265 A003093
Adjacent sequences: A112484 A112485 A112486 this_sequence A112488 A112489 A112490
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Wolfdieter Lang (wolfdieter.lang_AT_physik_DOT_uni-karlsruhe_DOT_de), Sep 12 2005
|
|
|
Search completed in 0.003 seconds
|