OFFSET
0,4
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..400
FORMULA
E.g.f.: sec(log(x+1)/exp(x)).
EXAMPLE
sec(log(x+1)/exp(x)) = 1 + 1/2!*x^2 - 9/3!*x^3 + 64/4!*x^4 - 510/5!*x^5 + ..
MATHEMATICA
CoefficientList[Series[Sec[Log[x + 1]/Exp[x]], {x, 0, 40}], x] Range[0, 40]! (* G. C. Greubel, Nov 15 2016 *)
PROG
(PARI) for(n=0, 15, print1(n!*polcoeff(1/cosh(ln(1+x)*exp(-x)), n), ", ")) \\ G. C. Greubel, Nov 16 2016
CROSSREFS
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved