OFFSET
0,5
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..448
MATHEMATICA
CoefficientList[Series[ArcSinh[Log[1 + x] - Sinh[x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Feb 04 2015 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Prepended missing a(0)=a(1)=0 from Vaclav Kotesovec, Feb 04 2015
STATUS
approved