A013442 arcsin(tan(x)-arctan(x))=4/3!*x^3-8/5!*x^5+992/7!*x^7-14464/9!*x^9...

4, -8, 992, -14464, 3391232, -175044608, 64560399360, -8423762821120, 4197760943882240, -1054662864854450176, 677817013904397697024, -277456857021505605206016, 226696976060712490528407552

Offset

0,1

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[ArcSin[Tan[x]-ArcTan[x]], {x, 0, nn}], x] Range[0, nn-1]!, {4, -1, 2}]] (* Harvey P. Dale, Dec 23 2019 *)

Crossrefs

Sequence in context: A308553 A177860 A013443 * A013441 A013445 A201386

Adjacent sequences: A013439 A013440 A013441 * A013443 A013444 A013445

Keyword

sign

Author

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

Status

approved