A013022 Expansion of e.g.f.: cosh(sinh(x)+log(x+1))=1+4/2!*x^2-6/3!*x^3+43/4!*x^4-170/5!*x^5...

1, 0, 4, -6, 43, -170, 1204, -7917, 65853, -583956, 5887014, -64564335, 775951059, -10081978062, 141184231920, -2117576980365, 33882606676089, -575996551450984, 10367999657321034, -196991613574996347

Offset

0,3

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[Cosh[Sinh[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 19 2014 *)

Crossrefs

Sequence in context: A355233 A145387 A034923 * A012908 A306842 A284634

Adjacent sequences: A013019 A013020 A013021 * A013023 A013024 A013025

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, Dec 19 2014

Status

approved