|
|
A051719
|
|
Denominators of column 2 of table described in A051714/A051715.
|
|
4
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn,easy,nice
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|