login
A012776
Expansion of e.g.f. arcsinh(sec(x) * log(x+1)).
0
0, 1, -1, 4, -6, 13, 75, -688, 3444, 17701, -627165, 8927708, -77106810, 67688905, 13345186855, -307791747352, 3673005693000, 5260749482825, -1552250968018713, 45434699608017268, -741230930507315470
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
Sequence in context: A160805 A359020 A246424 * A240198 A016072 A335163
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