A013382 arctan(sin(x)-tanh(x))=1/3!*x^3-15/5!*x^5+271/7!*x^7-8495/9!*x^9...

1, -15, 271, -8495, 492391, -47885175, 6512761711, -1126039513055, 241996705222231, -64384007995020135, 20971047413824897951, -8203471786087609654415, 3781059328242133245372871

Offset

0,2

Links

Table of n, a(n) for n=0..12.

Mathematica

With[{nn=40}, Take[CoefficientList[Series[ArcTan[Sin[x]-Tanh[x]], {x, 0, nn}], x] Range[ 0, nn-1]!, {4, -1, 2}]] (* Harvey P. Dale, May 08 2017 *)

Crossrefs

Sequence in context: A013381 A013384 A013380 * A227973 A195615 A156091

Adjacent sequences: A013379 A013380 A013381 * A013383 A013384 A013385

Keyword

sign

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Status

approved