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

%I #2 Mar 31 2012 13:20:27

%S 5,1,-5,7,-15,7601,-91,3617,-745739,3317609,-5981591,5436374093,

%T -213827575,213745149261,-249859397004145,238988952277727,

%U -28354566442037,26315271553053477373,-108409774812137683,3394075340453838586663

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

%F 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).

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

%Y Cf. A100615, A027643.

%K frac,sign

%O 1,1

%A _Alexander Adamchuk_, Jul 06 2006