A294314 Expansion of e.g.f. log(1 + x*sec(x))*exp(x).

0, 1, 1, 5, 0, 64, -245, 2757, -23576, 272256, -3270977, 45055845, -671589952, 10984688636, -193875825117, 3688182769117, -75085512079184, 1630385857436224, -37596306847103457, 917765946045581357, -23641953753495247624, 640958728426947233468, -18242640219843554954221

Offset: 0

Author

Ilya Gutkovskiy, Dec 27 2017

Keywords

• sign

Examples

			log(1 + x*sec(x))*exp(x) = x/1! + x^2/2! + 5*x^3/3! + 64*x^5/5! - 245*x^6/6! + ...
		

Crossrefs

Cf. A009334, A009371, A009442, A009843, A295278, A296336, A296436, A296438, A297206.

Programs

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]!