login
A013190
log(cosh(x)+arcsinh(x))=x-2/3!*x^3+8/4!*x^4-12/5!*x^5-48/6!*x^6...
0
0, 1, 0, -2, 8, -12, -48, 432, -2112, 10000, 14080, -1500512, 17517568, -18269760, -1666201600, 16350361856, -45064462336, 922523568384, -4131436888064, -990634832194048, 21402743134224384, 92553699220882432
OFFSET
0,4
FORMULA
a(n) ~ 2*n^(n-1) * exp(-n) * (2*Pi*cos(n*Pi/2) + 4*cos(1)*sin(n*Pi/2)) / (2+Pi^2+2*cos(2)). - Vaclav Kotesovec, Nov 01 2013
MATHEMATICA
CoefficientList[Series[Log[Cosh[x]+ArcSinh[x]], {x, 0, 20}], x]* Range[0, 20]! (* Vaclav Kotesovec, Nov 01 2013 *)
CROSSREFS
Sequence in context: A135443 A280092 A083546 * A176968 A308935 A126192
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Prepended missing a(0)=0 from Vaclav Kotesovec, Nov 01 2013
STATUS
approved