A013107 arctan(arcsinh(x)+arctan(x))=2*x-19/3!*x^3+1041/5!*x^5-141489/7!*x^7...

2, -19, 1041, -141489, 35842401, -14587836921, 8707393003617, -7166002987401489, 7776862795242656577, -10760731866324884664297, 18490186709158886988610113, -38627726709262739118225523137

Offset

0,1

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[ArcTan[ArcSinh[x]+ArcTan[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Ray Chandler, Nov 29 2016 *)

Crossrefs

Sequence in context: A013052 A012956 A012976 * A369946 A350933 A172028

Adjacent sequences: A013104 A013105 A013106 * A013108 A013109 A013110

Keyword

sign

Author

Patrick Demichel

Status

approved