A013362 tan(sin(x)-arctan(x))=1/3!*x^3-23/5!*x^5+719/7!*x^7-39759/9!*x^9...

1, -23, 719, -39759, 3416279, -416199431, 68177084975, -14464255598623, 3858701385264167, -1264194279838439447, 498983377122586500671, -233538587496361280678767, 127884277134966430982474999

Offset

0,2

Links

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

Mathematica

Select[CoefficientList[Series[Tan[Sin[x]-ArcTan[x]], {x, 0, 30}], x] Range[0, 29]!, #!=0&] (* Harvey P. Dale, Jul 24 2011 *)

Crossrefs

Sequence in context: A142553 A123782 A023278 * A013365 A127230 A013361

Adjacent sequences: A013359 A013360 A013361 * A013363 A013364 A013365

Keyword

sign

Author

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

Status

approved