A012910 E.g.f.: sech(arcsin(x)+log(x+1))=1-4/2!*x^2+6/3!*x^3+53/4!*x^4-310/5!*x^5...

1, 0, -4, 6, 53, -310, -1180, 21945, -3175, -2137140, 11656250, 251460275, -3687426175, -28037901450, 1119181111100, -870863209125, -357796134031375, 3533382651695000, 115201679883533750

Offset

0,3

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[Sech[ArcSin[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Mar 17 2015 *)

Crossrefs

Sequence in context: A012933 A013164 A013024 * A259133 A131847 A351733

Adjacent sequences: A012907 A012908 A012909 * A012911 A012912 A012913

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, Mar 17 2015

Status

approved