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

 

Logo
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
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
KEYWORD
sign
AUTHOR
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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 1 11:36 EST 2024. Contains 370432 sequences. (Running on oeis4.)