A120283 Numerator of the coefficients of the k^2 terms of Sum[Sum[(i+j)^(2n),{i,1,k}],{j,1,k}].

5, 1, -5, 7, -15, 7601, -91, 3617, -745739, 3317609, -5981591, 5436374093, -213827575, 213745149261, -249859397004145, 238988952277727, -28354566442037, 26315271553053477373, -108409774812137683, 3394075340453838586663

Offset

1,1

Links

Table of n, a(n) for n=1..20.

Formula

a(n) = numerator[Coefficient[Sum[Sum[(i+j)^(2n),{i,1,k}],{j,1,k}],k,2]]. a(n) = A100615(2n) - bisection of the numerators of B(n)(2).

Mathematica

Numerator[Coefficient[Table[Sum[Sum[(i+j)^(2n), {i, 1, k}], {j, 1, k}], {n, 1, 20}], k, 2]]

Crossrefs

Cf. A100615, A027643.

Sequence in context: A372958 A129769 A129766 * A103986 A196404 A381113

Adjacent sequences: A120280 A120281 A120282 * A120284 A120285 A120286

Keyword

frac,sign

Author

Alexander Adamchuk, Jul 06 2006

Status

approved