A009243 Expansion of exp(tan(x))*x.

0, 1, 2, 3, 12, 45, 222, 1239, 7672, 54873, 416410, 3577739, 32324292, 322495173, 3382216502, 38370542175, 457713511280, 5817952885169, 77686268202162, 1093812528874387, 16145162631579900, 249472828725529437, 4030053480328871182, 67807763939709678951

Offset

0,3

Links

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

Mathematica

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

Crossrefs

Sequence in context: A012516 A012306 A012312 * A232864 A371612 A307957

Adjacent sequences: A009240 A009241 A009242 * A009244 A009245 A009246

Keyword

nonn,easy

Author

R. H. Hardin

Extensions

Extended and signs tested by Olivier Gérard, Mar 15 1997

Status

approved