The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A009635 Expansion of e.g.f. tan(x*exp(x)). 9
 0, 1, 2, 5, 28, 201, 1566, 14349, 154456, 1870225, 25034650, 368887573, 5938767924, 103580577881, 1945112687350, 39137964503837, 840076566197552, 19158967944112929, 462642378426338994, 11792392190823752229 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 LINKS Seiichi Manyama, Table of n, a(n) for n = 0..100 FORMULA a(n) = 2*Sum_{m=0..floor((n-1)/2)} binomial(n, 2*m+1)*(2*m+1)^(n-2*m-1 * Sum_{j=1..2*m+1} j!*2^(2*m-j)*(-1)^(m+1+j)*Stirling2(2*m+1, j)). - Vladimir Kruchinin, Jun 10 2011 MATHEMATICA terms = 20; egf = Tan[x*Exp[x]] + O[x]^terms ; CoefficientList[egf, x] Range[0, terms - 1]! (* Jean-François Alcover, Sep 24 2019 *) PROG (Maxima) a(n):=2*sum(binomial(n, 2*m+1)*(2*m+1)^(n-2*m-1)*sum(j!*2^(2*m-j)*(-1)^(m+1+j)*stirling2(2*m+1, j), j, 1, 2*m+1), m, 0, (n-1)/2); /* Vladimir Kruchinin, Jun 10 2011 */ CROSSREFS Cf. A009017, A009448, A009768, A191719. Sequence in context: A318590 A072371 A019043 * A216401 A342288 A324264 Adjacent sequences: A009632 A009633 A009634 * A009636 A009637 A009638 KEYWORD nonn AUTHOR EXTENSIONS Extended, reformatted, offset corrected 03/97. STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 29 13:51 EST 2023. Contains 359923 sequences. (Running on oeis4.)