A013191 Expansion of e.g.f. log(cosh(x) + tanh(x)).

0, 1, 0, -3, 12, -15, -120, 1197, -6048, -255, 428160, -5448003, 29812992, 241437105, -8332047360, 104019879597, -293043130368, -17849464279935, 456591699640320, -5108933510880003, -26996975653552128

Offset

0,4

Links

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

Example

x - 3/3!*x^3 + 12/4!*x^4 - 15/5!*x^5 - 120/6!*x^6 ...

Mathematica

With[{nn=20}, CoefficientList[Series[Log[Cosh[x]+Tanh[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jun 20 2021 *)

Crossrefs

Sequence in context: A330941 A361925 A096854 * A332959 A009783 A341013

Adjacent sequences: A013188 A013189 A013190 * A013192 A013193 A013194

Keyword

sign

Author

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

Extensions

a(0)=0 inserted and title improved by Sean A. Irvine, Aug 01 2018

Status

approved