OFFSET
0,2
COMMENTS
For references and cross references, compare the overview in A349264.
MAPLE
sec(7*x)*(-sin(2*x) + sin(4*x) + sin(6*x) + cos(x) + cos(3*x) - cos(5*x)): series(%, x, 20): seq(n!*coeff(%, x, n), n = 0..17);
MATHEMATICA
m = 17; CoefficientList[Series[Sec[7*x] * (-Sin[2*x] + Sin[4*x] + Sin[6*x] + Cos[x] + Cos[3*x] - Cos[5*x]), {x, 0, m}], x] * Range[0, m]! (* Amiram Eldar, Nov 21 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Nov 21 2021
STATUS
approved