A013482 exp(cos(x)-sech(x))=1-4/4!*x^4+60/6!*x^6-824/8!*x^8+120/10!*x^10...

1, 0, -4, 60, -824, 120, 1331156, -151389420, 15474229936, -1609208740560, 165275248217516, -13317787644945300, -752763454703346104, 1012558531283275284360, -490748297800639153012924

Offset

0,3

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Exp[Cos[x]-Sech[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Sep 21 2019 *)

Crossrefs

Sequence in context: A007220 A034866 A055315 * A123480 A227528 A156090

Adjacent sequences: A013479 A013480 A013481 * A013483 A013484 A013485

Keyword

sign

Author

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

Status

approved