A051719 Denominators of column 2 of table described in A051714/A051715.

3, 4, 20, 20, 140, 28, 140, 20, 220, 44, 20020, 1820, 1820, 4, 340, 340, 45220, 532, 29260, 220, 5060, 92, 41860, 1820, 1820, 4, 580, 580, 1384460, 9548, 811580, 340, 340, 4, 1279460, 1279460, 1279460, 4, 9020, 9020, 2715020, 1204, 138460, 460

Offset

0,1

Links

Seiichi Manyama, Table of n, a(n) for n = 0..1000

M. Kaneko, The Akiyama-Tanigawa algorithm for Bernoulli numbers, J. Integer Sequences, 3 (2000), #00.2.9.

Mathematica

nmax = 43; a[0, k_] := 1/(k + 1); a[n_, k_] := a[n, k] = (k + 1)*(a[n - 1, k] - a[n - 1, k + 1]); Table[a[n, k], {n, 0, nmax}, {k, 0, nmax}] [[All, 3]] // Denominator (* Jean-François Alcover, Oct 08 2012 *)

Crossrefs

Cf. A051714, A051715, A051718.

Sequence in context: A256605 A237884 A256532 * A336619 A240970 A333320

Adjacent sequences: A051716 A051717 A051718 * A051720 A051721 A051722

Keyword

nonn,easy,nice

Author

N. J. A. Sloane

Extensions

More terms from James A. Sellers, Dec 08 1999

Status

approved