A009514 - OEIS

A009514

sin(sinh(x)*tan(x))=2/2!*x^2+12/4!*x^4+22/6!*x^6-6888/8!*x^8...

0, 2, 12, 22, -6888, -664918, -59975388, -5718140738, -547324724688, -38493249163438, 4551120221502012, 4118717773789761382, 1943760618993686019912, 842266610124834993878522, 367005752387547761811702612, 164337720240421801745499143182

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

LINKS

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

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

Adjacent sequences: A009511 A009512 A009513 * A009515 A009516 A009517

KEYWORD

sign

AUTHOR

R. H. Hardin

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