A012976 arctan(arctan(x)+sin(x))=2*x-19/3!*x^3+1033/5!*x^5-139921/7!*x^7...

2, -19, 1033, -139921, 35331409, -14334032601, 8528641989385, -6996533376858481, 7568756053179558689, -10439411395932267346985, 17880910414730276822733721, -37235878792206753318991025025

Offset

0,1

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[ArcTan[ArcTan[x]+Sin[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Apr 05 2016 *)

Crossrefs

Sequence in context: A128345 A013052 A012956 * A013107 A369946 A350933

Adjacent sequences: A012973 A012974 A012975 * A012977 A012978 A012979

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, Apr 05 2016

Status

approved