A013490 E.g.f.: exp(sinh(x)-tanh(x))=1+3/3!*x^3-15/5!*x^5+90/6!*x^6+273/7!*x^7...

1, 0, 0, 3, 0, -15, 90, 273, -2520, -375, 126630, -269907, -7232940, 44118165, 525494970, -6182721087, -41497943760, 965945373105, 2901128941710, -171088458444267, 81569169583020, 34527329266886445

Offset

0,4

Links

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

Mathematica

With[{nn=30}, CoefficientList[Series[Exp[Sinh[x]-Tanh[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 08 2013 *)

Crossrefs

Sequence in context: A091000 A361804 A351155 * A013351 A013407 A013494

Adjacent sequences: A013487 A013488 A013489 * A013491 A013492 A013493

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, Dec 08 2013

Status

approved