OFFSET
0,4
EXAMPLE
x - 1/2!*x^2 + 4/3!*x^3 - 6/4!*x^4 + 13/5!*x^5 ...
MATHEMATICA
Range[0, 21]! CoefficientList[ Series[ArcSinh[Sec[x] Log[x + 1]], {x, 0, 21}], x] (* Robert G. Wilson v, Jul 24 2018 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
a(0) inserted and title improved by Sean A. Irvine, Jul 24 2018
STATUS
approved