A013291 Expansion of e.g.f.: cosh(log(x+1)-tanh(x))=1+3/4!*x^4-40/5!*x^5+250/6!*x^6-1008/7!*x^7...

1, 0, 0, 0, 3, -40, 250, -1008, 6517, -87120, 981924, -9387840, 103808727, -1434810936, 20930063102, -308368386480, 4838631496873, -82524970065824, 1497919608463368, -28494789851849472, 568078461069883755

Offset

0,5

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[Cosh[Log[x+1]-Tanh[x]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, May 07 2022 *)

Crossrefs

Sequence in context: A013256 A013293 A013286 * A013292 A278379 A181395

Adjacent sequences: A013288 A013289 A013290 * A013292 A013293 A013294

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, May 07 2022

Status

approved