OFFSET
0,6
EXAMPLE
x + 8/5!*x^5 - 48/6!*x^6 + 392/7!*x^7 - 2240/8!*x^8 ...
MATHEMATICA
With[{nn=20}, CoefficientList[Series[Log[Cosh[x]+ArcSin[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 07 2020 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
a(0)=0 inserted and title improved by Sean A. Irvine, Aug 01 2018
STATUS
approved