This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A051719 #21 Jul 02 2025 16:01:58 %S A051719 3,4,20,20,140,28,140,20,220,44,20020,1820,1820,4,340,340,45220,532, %T A051719 29260,220,5060,92,41860,1820,1820,4,580,580,1384460,9548,811580,340, %U A051719 340,4,1279460,1279460,1279460,4,9020,9020,2715020,1204,138460,460 %N A051719 Denominators of column 2 of table described in A051714/A051715. %H A051719 Seiichi Manyama, <a href="/A051719/b051719.txt">Table of n, a(n) for n = 0..1000</a> %H A051719 M. Kaneko, <a href="https://cs.uwaterloo.ca/journals/JIS/VOL3/KANEKO/AT-kaneko.html">The Akiyama-Tanigawa algorithm for Bernoulli numbers</a>, J. Integer Sequences, 3 (2000), #00.2.9. %t A051719 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 *) %Y A051719 Cf. A051714, A051715, A051718. %K A051719 nonn,easy,nice %O A051719 0,1 %A A051719 _N. J. A. Sloane_ %E A051719 More terms from _James Sellers_, Dec 08 1999