A012688 arcsin(tanh(x)*cos(x))=x-4/3!*x^3+576/7!*x^7+8960/9!*x^9...

1, -4, 0, 576, 8960, -2566144, -79073280, 51695271936, 3314973409280, -3424245425373184, -358564361388687360, 553778978731900010496, 86787459990613183692800, -186450610504520626836865024

Offset

0,2

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[ArcSin[Tanh[x]Cos[x]], {x, 0, nn}], x]Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Oct 02 2011 *)

Crossrefs

Sequence in context: A099841 A013452 A013453 * A216675 A012502 A130105

Adjacent sequences: A012685 A012686 A012687 * A012689 A012690 A012691

Keyword

sign

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Status

approved