login
A013000
arctan(arctan(x)+tan(x))=2*x-16/3!*x^3+808/5!*x^5-99328/7!*x^7...
0
2, -16, 808, -99328, 22756480, -8373489408, 4518380796928, -3361577372366848, 3297920024665948160, -4125214890387616169984, 6407889739355365222383616, -12101572905129973895312965632
OFFSET
0,1
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[ArcTan[ArcTan[x]+Tan[x]], {x, 0, nn}], x]Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, May 05 2012 *)
CROSSREFS
Sequence in context: A013137 A013990 A013005 * A013178 A306000 A084595
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Corrected definition - N. J. A. Sloane, Dec 17 2011
STATUS
approved