A013375 sec(sin(x)-sinh(x))=1+40/6!*x^6+480/10!*x^10+1232000/12!*x^12...

1, 0, 0, 40, 0, 480, 1232000, 8320, 256256000, 744065052160, 56972032000, 933057413785600, 3248379673651200000, 1038642349994762240, 15202354034221486080000, 62540998641516972945735680

Offset

0,4

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sec[Sin[x]-Sinh[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Oct 19 2018 *)

Crossrefs

Sequence in context: A331907 A247404 A013373 * A013419 A013420 A156917

Adjacent sequences: A013372 A013373 A013374 * A013376 A013377 A013378

Keyword

nonn

Author

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

Status

approved