login
A009251
Expansion of exp(tan(x)*sinh(x)).
0
1, 2, 24, 622, 27944, 1905482, 182347044, 23219007502, 3785452962224, 767440357144082, 189091470902634684, 55586950224109363222, 19201372121239603122824, 7694882454025442035178522
OFFSET
0,2
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[Exp[Tan[x]*Sinh[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Aug 01 2020 *)
CROSSREFS
Sequence in context: A186632 A089835 A210909 * A009447 A193442 A123741
KEYWORD
nonn
AUTHOR
EXTENSIONS
Extended and signs tested Mar 15 1997 by Olivier Gérard.
Previous Mathematica program replaced by Harvey P. Dale, Aug 01 2020
STATUS
approved