A013124 Expansion of e.g.f. arcsinh(tanh(x) + log(x+1)).

0, 2, -1, -8, 18, 298, -1905, -25412, 350700, 4095754, -108856125, -940845072, 49635561030, 233977315570, -31129149144093, 12883816215268, 25437319822551000, -179134252641817006, -25989451309294893657

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 + 298/5!*x^5 ...

Mathematica

With[{nn=20}, CoefficientList[Series[ArcSinh[Tanh[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Nov 12 2025 *)

Crossrefs

Sequence in context: A235048 A013118 A012961 * A012966 A168244 A009828

Adjacent sequences: A013121 A013122 A013123 * A013125 A013126 A013127

Keyword

sign

Author

Patrick Demichel

Extensions

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

Status

approved