proposed
approved
proposed
approved
editing
proposed
B[0, 0] = 1; B[n_, k_] := Sum[(-1)^(j-n)/(j+1)*Binomial[k+1, j+1]* Sum[i^n*(j-i+1)^(k-n) , {i, 0, j}] , {j, 0, k}];
Table[B[n, k] // Numerator, {n, 0, 8}, {k, 0, n}] // Flatten (* Jean-François Alcover, Jul 19 2018, from Maple *)
approved
editing
editing
approved
editing
approved
The diagonal B(n, n) give gives the Bernoulli numbers B_n = B_n(1). The formula is due to L. Kronecker and the generalization to Fukuhara, Kawazumi and Kuno.
approved
editing
proposed
approved
editing
proposed
sign,tabl,frac,changed
proposed
editing