login
A013275
E.g.f. sinh(log(x+1) - arcsinh(x)) = -1/2!*x^2 + 3/3!*x^3 - 6/4!*x^4 + 15/5!*x^5 + ...
0
0, 0, -1, 3, -6, 15, -135, 1260, -8820, 65205, -722925, 9043650, -101974950, 1197971775, -17665522875, 286053768000, -4408292889000, 70284304715625, -1307027554457625, 26160675737946750, -509941992726416250
OFFSET
0,4
FORMULA
a(n) ~ n! * (-1)^(n+1) * (sqrt(2)-1)/2. - Vaclav Kotesovec, Feb 04 2015
MATHEMATICA
With[{nn = 20}, CoefficientList[Series[Sinh[Log[x + 1] - ArcSinh[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 08 2012 *)
CROSSREFS
Sequence in context: A013270 A013276 A110809 * A013271 A013272 A013278
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Prepended the two initial zeros, Joerg Arndt, Dec 08 2012.
STATUS
approved