A071968 Denominators of coefficients of expansion of arctan(x)^2 = x^2-2/3*x^4+23/45*x^6-44/105*x^8+563/1575*x^10-3254/10395*x^12+ ...

1, 1, 3, 45, 105, 1575, 10395, 315315, 45045, 6891885, 72747675, 160044885, 1003917915, 21751554825, 35137127025, 2183521465125, 4512611027925, 76714387474725, 40613499251325, 3172365552631275

Offset: 0

Author

N. J. A. Sloane, Jun 17 2002

Keywords

• nonn
• easy
• frac

Crossrefs

Cf. A002428.

Programs

Mathematica

a[n_] := (-1)^(n+1)*Sum[1/(n*(2*k-1)), {k, 1, n}] // Denominator; Table[a[n], {n, 0, 19}] (* Jean-François Alcover, Nov 04 2013 *)