OFFSET
0,6
EXAMPLE
log(1 + x*cos(x))*exp(x) = x/1! + x^2/2! - x^3/3! - 16*x^5/5! - 5*x^6/6! + ...
MAPLE
a:=series(log(1 + x*cos(x))*exp(x), x=0, 25): seq(n!*coeff(a, x, n), n=0..24); # Paolo P. Lava, Mar 27 2019
MATHEMATICA
nmax = 24; CoefficientList[Series[Log[1 + x Cos[x]] Exp[x], {x, 0, nmax}], x] Range[0, nmax]!
PROG
(PARI) x='x+O('x^99); concat([0], Vec(serlaplace(exp(x)*log(1+x*cos(x))))) \\ Altug Alkan, Dec 28 2017
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Dec 27 2017
STATUS
approved