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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A009801 E.g.f. tanh(sin(x)*sin(x)) (even powers only). 2
 0, 2, -8, -208, 13312, -80128, -84819968, 9993992192, 759755210752, -560066285928448, 72155207745667072, 37670722015948439552, -22728912607776874692608, 734502681629602026094592, 6152371237231406870966566912, -3384992827698865393138954928128 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 LINKS Table of n, a(n) for n=0..15. FORMULA a(n)=2*sum(m=1..2*n, ((sum(k=1..m, (-1)^(k+1)*k!*2^(2*n-m-k)*stirling2(m,k)))*sum(i=0..m, (i-m)^(2*n)*binomial(2*m,i)*(-1)^(n+m-i)))/(m!)). - Vladimir Kruchinin, Jun 28 2011 EXAMPLE tanh(sin(x)*sin(x)) = 2/2!*x^2-8/4!*x^4-208/6!*x^6+13312/8!*x^8... MATHEMATICA With[{nn=30}, Take[CoefficientList[Series[Tanh[Sin[x]^2], {x, 0, nn}], x] Range[ 0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Apr 07 2014 *) PROG (Maxima) a(n):=2*sum(((sum((-1)^(k+1)*k!*2^(2*n-m-k)*stirling2(m, k), k, 1, m))*sum((i-m)^(2*n)*binomial(2*m, i)*(-1)^(n+m-i), i, 0, m))/(m!), m, 1, 2*n); /* Vladimir Kruchinin, Jun 28 2011 */ CROSSREFS Sequence in context: A012539 A012535 A012300 * A012297 A000893 A030177 Adjacent sequences: A009798 A009799 A009800 * A009802 A009803 A009804 KEYWORD sign AUTHOR R. H. Hardin EXTENSIONS Extended with signs by Olivier Gérard, Mar 15 1997 More terms from Harvey P. Dale, Apr 07 2014 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 March 1 11:36 EST 2024. Contains 370432 sequences. (Running on oeis4.)