A009512 E.g.f.: Expansion of sin(tan(x)*exp(x)).

0, 1, 2, 4, 0, -68, -728, -5952, -45696, -327984, -2158048, -10849984, 1959936, 1293807296, 28759028352, 496656980992, 7808314863616, 117171600955648, 1701928967111168, 23910073404326912, 319503027092291584

Offset

0,3

Links

Table of n, a(n) for n=0..20.

Mathematica

With[{nn=30}, CoefficientList[Series[Sin[Tan[x]*Exp[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, May 28 2012 *)

Crossrefs

Sequence in context: A012710 A333367 A287761 * A317411 A309598 A305570

Adjacent sequences: A009509 A009510 A009511 * A009513 A009514 A009515

Keyword

sign,easy

Author

R. H. Hardin

Extensions

Extended with signs by Olivier Gérard, Mar 15 1997

Definition clarified by Harvey P. Dale, May 28 2012

Status

approved