A012364 E.g.f.: sec(tan(x)*exp(x))=1+1/2!*x^2+6/3!*x^3+37/4!*x^4+260/5!*x^5...

1, 0, 1, 6, 37, 260, 2317, 24178, 288937, 3858312, 57255609, 933952030, 16622217357, 320373757964, 6649221916677, 147840789218442, 3506147948661457, 88343770525310736, 2356871357851041777

Offset

0,4

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[Sec[Tan[x]Exp[x]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Mar 07 2015 *)

Crossrefs

Sequence in context: A362094 A079751 A088312 * A012719 A300171 A218298

Adjacent sequences: A012361 A012362 A012363 * A012365 A012366 A012367

Keyword

nonn

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Extensions

Definition clarified by Harvey P. Dale, Mar 07 2015

Status

approved