A013441 sin(tan(x)-arctan(x))=4/3!*x^3-8/5!*x^5+992/7!*x^7-50304/9!*x^9...

4, -8, 992, -50304, 4573952, -738222080, 127954033664, -34953731964928, 10769261343309824, -4380269574963986432, 2085941501322197073920, -1202553346613607891730432, 808239805736578791916961792

Offset

0,1

Links

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

Mathematica

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

Crossrefs

Sequence in context: A177860 A013443 A013442 * A013445 A201386 A009511

Adjacent sequences: A013438 A013439 A013440 * A013442 A013443 A013444

Keyword

sign

Author

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

Status

approved