A012445 sin(arctan(x)*tan(x))=2/2!*x^2+40/6!*x^6-2688/8!*x^8-31712/10!*x^10...

2, 0, 40, -2688, -31712, -13038080, -341144960, -124075126784, -16972742475264, 4013224846508032, -4370688326014457856, 2734360152236817809408, -2075517087570212545880064, 1712256529842324555250663424, -1579921804125758497599230672896

Offset

0,1

Links

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

Mathematica

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

Crossrefs

Sequence in context: A357541 A230888 A185281 * A012450 A303491 A303396

Adjacent sequences: A012442 A012443 A012444 * A012446 A012447 A012448

Keyword

sign

Author

Patrick Demichel

Extensions

More terms from Harvey P. Dale, Dec 20 2014

Status

approved