login
A013332
Expansion of e.g.f.: cos(exp(x)-sec(x))=1-1/2!*x^2-3/4!*x^4+20/5!*x^5+3/6!*x^6...
0
1, 0, -1, 0, -3, 20, 3, 420, -343, 8424, -22249, 260040, -239547, 10498748, 94138107, -147119700, 19810696721, -201766341168, 3757708820591, -61124264974704, 781479753273933, -16996638107062684
OFFSET
0,5
MATHEMATICA
With[{nn=30}, CoefficientList[Series[Cos[Exp[x]-Sec[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Mar 27 2022 *)
CROSSREFS
Sequence in context: A117844 A260371 A067607 * A223282 A223480 A063871
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Definition clarified by Harvey P. Dale, Mar 27 2022
STATUS
approved