A012966 Expansion of e.g.f. arcsinh(arctan(x) + log(x+1)).

0, 2, -1, -8, 18, 306, -1905, -26532, 353388, 4334778, -110509245, -1021609008, 50779213254, 272982059658, -32111535861405, -11592260316252, 26485822571365080, -161024492765786958, -27356021208171990873

Offset

0,2

Links

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

Example

2*x - 1/2!*x^2 - 8/3!*x^3 + 18/4!*x^4 + 306/5!*x^5 ...

Mathematica

With[{nn=20}, Rest[CoefficientList[Series[ArcSinh[ArcTan[x]+Log[x+1]], {x, 0, nn}], x]Range[0, nn]!]] (* Harvey P. Dale, Jan 13 2012 *)

Crossrefs

Sequence in context: A013118 A012961 A013124 * A168244 A009828 A084222

Adjacent sequences: A012963 A012964 A012965 * A012967 A012968 A012969

Keyword

sign

Author

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

Extensions

a(0)=0 inserted and title improved by Sean A. Irvine, Jul 29 2018

Status

approved