A012046 arctan(sin(tanh(x)))=x-5/3!*x^3+121/5!*x^5-7013/7!*x^7+752785/9!*x^9...

1, -5, 121, -7013, 752785, -129763589, 32812992265, -11441858264741, 5261501926546081, -3084889329990554117, 2246121092328414171673, -1988316104656824914919653, 2102978545788269109358313521

Offset

0,2

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[ArcTan[Sin[Tanh[x]]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Sep 01 2023 *)

Crossrefs

Sequence in context: A012026 A012190 A012077 * A012151 A012156 A368854

Adjacent sequences: A012043 A012044 A012045 * A012047 A012048 A012049

Keyword

sign

Author

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

Status

approved