login
A013186
Expansion of e.g.f. log(cosh(x) + arcsin(x)).
0
0, 1, 0, 0, 0, 8, -48, 392, -2240, 20096, -147200, 1754368, -16873472, 241340032, -2769127424, 44833033216, -593918959616, 10840711614464, -164204798541824, 3348758074142720, -57147730941444096
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
Sequence in context: A077708 A165041 A165049 * A165506 A165748 A220174
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