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!)
A009837 Expansion of tanh(x)tan(x)/2 in powers of x^(4*n+2). 2
1, 56, 46336, 182844416, 2205641015296, 63603482126974976, 3748468097940723859456, 404963012992964559934324736, 74035562436962891333631597346816, 21543523644222111882868080329093021696, 9505937948357641883573662624456235995365376 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..120

FORMULA

a(n) = [ x^(4*n+2) ] ( tanh(x)*tan(x)/2 ).

a(n) = A024342(n)/2.

a(n) ~ (4*n+2)! * 2^(4*n+4) * tanh(Pi/2) / Pi^(4*n+3). - Vaclav Kotesovec, Jan 24 2015

MATHEMATICA

nn=20; Table[(CoefficientList[Series[(Tan[x]*Tanh[x])/2, {x, 0, 4*nn+2}], x] * Range[0, 4*nn+2]!)[[n]], {n, 3, 4*nn+1, 4}] (* Vaclav Kotesovec, Jan 24 2015 *)

PROG

(Magma)

m:=50; R<x>:=PowerSeriesRing(Rationals(), m);

b:= Coefficients(R!(Laplace( Tan(x)*Tanh(x)/2 )));

[b[4*n-3]: n in [1..Floor((m-2)/4)]]; // G. C. Greubel, Jan 31 2022

(Sage) [factorial(4*n+2)*( tan(x)*tanh(x)/2 ).series(x, 4*n+3).list()[4*n+2] for n in (0..20)] # G. C. Greubel, Jan 31 2022

CROSSREFS

Cf. A024342.

Sequence in context: A090218 A184897 A159673 * A308390 A093256 A177325

Adjacent sequences:  A009834 A009835 A009836 * A009838 A009839 A009840

KEYWORD

nonn

AUTHOR

R. H. Hardin

EXTENSIONS

Extended and signs tested Mar 1997.

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 October 5 21:37 EDT 2022. Contains 357261 sequences. (Running on oeis4.)