login
A013451
E.g.f.: exp(tan(x)-tanh(x))=1+4/3!*x^3+160/6!*x^6+544/7!*x^7+17920/9!*x^9...
0
1, 0, 0, 4, 0, 0, 160, 544, 0, 17920, 261120, 707584, 3942400, 149360640, 1538068480, 5242548224, 111522611200, 2782416732160, 25458261360640, 166243180478464, 5279051703910400, 109528131284500480
OFFSET
0,4
MATHEMATICA
With[{nn=30}, CoefficientList[Series[Exp[Tan[x]-Tanh[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jun 19 2013 *)
CROSSREFS
Sequence in context: A369379 A358292 A071608 * A013462 A326862 A222325
KEYWORD
nonn
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Definition clarified by Harvey P. Dale, Jun 19 2013
STATUS
approved