|
|
A294314
|
|
Expansion of e.g.f. log(1 + x*sec(x))*exp(x).
|
|
3
|
|
|
0, 1, 1, 5, 0, 64, -245, 2757, -23576, 272256, -3270977, 45055845, -671589952, 10984688636, -193875825117, 3688182769117, -75085512079184, 1630385857436224, -37596306847103457, 917765946045581357, -23641953753495247624, 640958728426947233468, -18242640219843554954221
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
EXAMPLE
|
log(1 + x*sec(x))*exp(x) = x/1! + x^2/2! + 5*x^3/3! + 64*x^5/5! - 245*x^6/6! + ...
|
|
MAPLE
|
a:=series(log(1+x*sec(x))*exp(x), x=0, 23): seq(n!*coeff(a, x, n), n=0..22); # Paolo P. Lava, Mar 27 2019
|
|
MATHEMATICA
|
nmax = 22; CoefficientList[Series[Log[1 + x Sec[x]] Exp[x], {x, 0, nmax}], x] Range[0, nmax]!
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|