A013365 sinh(sin(x)-arctan(x))=1/3!*x^3-23/5!*x^5+719/7!*x^7-40039/9!*x^9...

1, -23, 719, -40039, 3522539, -447600515, 77667878287, -17678180216111, 5114563630418963, -1833901052655286363, 798306636459002471063, -414704864473303294302407, 253396539072278830083000859

Offset

0,2

Links

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

Mathematica

With[{nn=40}, Rest[Take[CoefficientList[Series[Sinh[Sin[x]- ArcTan[x]], {x, 0, nn}], x]Range[0, nn-1]!, {2, -1, 2}]]] (* Harvey P. Dale, Oct 19 2011 *)

Crossrefs

Sequence in context: A123782 A023278 A013362 * A127230 A013361 A013363

Adjacent sequences: A013362 A013363 A013364 * A013366 A013367 A013368

Keyword

sign

Author

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

Status

approved