login
A013314
cos(exp(x)-cos(x))=1-1/2!*x^2-6/3!*x^3-15/4!*x^4+183/6!*x^6...
0
1, 0, -1, -6, -15, 0, 183, 1162, 4305, 4032, -75169, -720390, -4057119, -13316160, 17994039, 691795018, 6706003809, 45159313536, 210202685567, 247239745914, -8759676926319, -137896385117568, -1415069646671241
OFFSET
0,4
MATHEMATICA
With[{nn=25}, CoefficientList[Series[Cos[Exp[x]-Cos[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Oct 21 2011 *)
CROSSREFS
Sequence in context: A158965 A284075 A281693 * A328339 A019306 A115408
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved