Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A009514
sin(sinh(x)*tan(x))=2/2!*x^2+12/4!*x^4+22/6!*x^6-6888/8!*x^8...
2
0, 2, 12, 22, -6888, -664918, -59975388, -5718140738, -547324724688, -38493249163438, 4551120221502012, 4118717773789761382, 1943760618993686019912, 842266610124834993878522, 367005752387547761811702612, 164337720240421801745499143182
OFFSET
0,2
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[Sin[Tan[x]Sinh[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Oct 04 2014 *)
CROSSREFS
Sequence in context: A093378 A012664 A012545 * A192851 A112718 A365500
KEYWORD
sign
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
More terms from and prior Mathematica program replaced by Harvey P. Dale, Oct 04 2014
STATUS
approved