A013056 exp(sinh(x)+arctan(x))=1+2*x+4/2!*x^2+7/3!*x^3+8/4!*x^4+17/5!*x^5...

1, 2, 4, 7, 8, 17, 214, 1089, -2120, -36439, 244474, 4128909, -19663636, -543199915, 2667954774, 101851512369, -459657139376, -24809162213327, 101692759589938, 7679423522214741, -27454474974890796

Offset

0,2

Links

Table of n, a(n) for n=0..20.

Mathematica

With[{nn=20}, CoefficientList[Series[Exp[Sinh[x]+ArcTan[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, May 08 2021 *)

Crossrefs

Sequence in context: A369703 A337744 A045594 * A013131 A293759 A122979

Adjacent sequences: A013053 A013054 A013055 * A013057 A013058 A013059

Keyword

sign

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Status

approved