A013479 cosh(cos(x)-cosh(x))=1+12/4!*x^4+1792/8!*x^8+889152/12!*x^12...

1, 12, 1792, 889152, 1045556992, 2424156352512, 9849171061952512, 64566114865428283392, 642433596401162586161152, 9255521545388420536885051392, 185972570219438391836588939149312, 5054977199391984218529977072942579712

Offset

0,2

Links

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

Mathematica

With[{nn=40}, Take[CoefficientList[Series[Cosh[Cos[x]-Cosh[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 4}]] (* Harvey P. Dale, May 24 2013 *)

Crossrefs

Sequence in context: A174775 A145186 A160304 * A090914 A049406 A049405

Adjacent sequences: A013476 A013477 A013478 * A013480 A013481 A013482

Keyword

nonn

Author

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

Extensions

More terms from Harvey P. Dale, May 24 2013

Status

approved