login
A013513
cosh(sec(x)-sech(x)) = 1+12/4!*x^4+8512/8!*x^8+34406592/12!*x^12...
0
1, 12, 8512, 34406592, 471749623552, 16325059994068992, 1187794482738667098112, 160833904474220565517811712, 37152672501146694986367085576192, 13716936936404675660073679524327063552, 7693299929324832174022888419623013572411392, 6292927164359183105695668653932580594051985702912
OFFSET
0,2
MATHEMATICA
With[{nn=60}, Take[CoefficientList[Series[Cosh[Sec[x]-Sech[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 4}]] (* Harvey P. Dale, Mar 14 2017 *)
CROSSREFS
Sequence in context: A009173 A012531 A013481 * A013480 A107254 A345679
KEYWORD
nonn
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
More terms from N. J. A. Sloane, Dec 17 2011
STATUS
approved