A013015 Expansion of e.g.f.: arcsin(sinh(x)+log(x+1))=2*x-1/2!*x^2+11/3!*x^3-30/4!*x^4+463/5!*x^5...

0, 2, -1, 11, -30, 463, -3015, 57136, -640500, 14305285, -234551205, 6059972426, -131755815510, 3893200782703, -105378631417059, 3527510549050216, -113921716355789160, 4281885187994847705, -160171336678757139081

Offset

0,2

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[ArcSin[Sinh[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Oct 06 2017 *)

Crossrefs

Sequence in context: A151337 A013019 A012904 * A012900 A009288 A322513

Adjacent sequences: A013012 A013013 A013014 * A013016 A013017 A013018

Keyword

sign

Author

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

Extensions

Definition clarified and zero prepended by Harvey P. Dale, Oct 06 2017

Status

approved