A051713 Denominator of b(n)-b(n+1), where b(n) = n/((n+1)(n+2)) = A026741/A045896.
1, 60, 60, 70, 84, 504, 120, 990, 165, 572, 1092, 2730, 280, 4080, 2448, 1938, 855, 7980, 1540, 10626, 3036, 4600, 7800, 17550, 819, 21924, 12180, 8990, 7440, 32736, 5984, 39270, 5355, 15540, 25308, 54834, 4940, 63960, 34440
Offset: 1
Examples
0, 1/60, 1/60, 1/70, 1/84, 5/504, 1/120, 7/990, 1/165, 3/572,...
Links
- M. Kaneko, The Akiyama-Tanigawa algorithm for Bernoulli numbers, J. Integer Sequences, 3 (2000), #00.2.9.
Programs
-
Mathematica
Denominator[#[[1]]-#[[2]]&/@(Partition[#[[1]]/(#[[2]]#[[3]])&/@Partition[ Range[50],3,1],2,1])] (* Harvey P. Dale, Nov 15 2014 *)