A013483 E.g.f.: sin(cos(x)-sech(x)) (even powers only).

0, 0, -4, 60, -1384, 50520, -2333164, 98460180, 2691348656, -2502877578960, 816953866876076, -250462447769994900, 80927047278922241096, -28429551522622456235640, 10951929595731882160395716

Offset

0,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..50

Example

sin(cos(x)-sech(x))=0*x^0+0*x^2-4/4!*x^4+60/6!*x^6-1384/8!*x^8+50520/10!*x^10...

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sin[Cos[x]-Sech[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Mar 09 2014 *)

Crossrefs

Sequence in context: A370498 A325154 A013486 * A013484 A013485 A377528

Adjacent sequences: A013480 A013481 A013482 * A013484 A013485 A013486

Keyword

sign

Author

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

Extensions

Name clarified, a(0)=a(1)=1 prepended, Joerg Arndt, Mar 09 2014

Status

approved