|
|
A332666
|
|
Denominators of higher order Bernoulli numbers.
|
|
0
|
|
|
2, 4, 12, 24, 20, 24, 840, 16, 180, 840, 440, 720, 6552, 112, 240, 7392, 2380, 72, 207480, 560, 27720, 55440, 2576, 10080, 397800, 2288, 23760, 12768, 2320, 1440, 44684640, 45760, 6732, 985320, 1400, 4752, 1266665400, 304304, 28080, 30240, 2146760, 314160, 59915856, 160160, 7534800, 14305632
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
MATHEMATICA
|
a[n_] := Integrate[Product[t - i, {i, 1, 2 n + 1}], {t, 0, 1}] // Denominator // Abs; a /@ Range[0, 45]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|