A012014 arctan(sin(tan(x)))=x-1/3!*x^3+1/5!*x^5-169/7!*x^7-1823/9!*x^9...

1, -1, 1, -169, -1823, -365905, -17126303, -3688466617, -393996411839, -109259290725793, -20477152840654271, -7401734340295771849, -2112803982091750971359, -978357645904185043693297

Offset

0,4

Links

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

Mathematica

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

Crossrefs

Sequence in context: A241538 A231974 A183716 * A221889 A156160 A264261

Adjacent sequences: A012011 A012012 A012013 * A012015 A012016 A012017

Keyword

sign

Author

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

Status

approved