|
|
A012002
|
|
arctan(log(cos(x)))=-1/2!*x^2-2/4!*x^4+14/6!*x^6+568/8!*x^8...
|
|
0
|
|
|
0, -1, -2, 14, 568, 2144, -1061312, -65851696, 3745115008, 1232648783744, 50799435228928, -36670923310299136, -8828746813705828352, 954888000296009790464, 1122466427244127979911168
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{nn=30}, Take[CoefficientList[Series[ArcTan[Log[Cos[x]]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Aug 10 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Patrick Demichel (patrick.demichel(AT)hp.com)
|
|
EXTENSIONS
|
Added missing 0 at start, otherwise this is OK. - N. J. A. Sloane, Dec 17 2011
|
|
STATUS
|
approved
|
|
|
|