|
%I #9 Apr 06 2020 12:35:58
%S 2,4,12,24,20,24,840,16,180,840,440,720,6552,112,240,7392,2380,72,
%T 207480,560,27720,55440,2576,10080,397800,2288,23760,12768,2320,1440,
%U 44684640,45760,6732,985320,1400,4752,1266665400,304304,28080,30240,2146760,314160,59915856,160160,7534800,14305632
%N Denominators of higher order Bernoulli numbers.
%H N. E. Nørlund, <a href="http://www-gdz.sub.uni-goettingen.de/cgi-bin/digbib.cgi?PPN373206070">Vorlesungen über Differenzenrechnung</a>, Springer, 1924, p. 461 and p. 147.
%t a[n_] := Integrate[Product[t - i, {i, 1, 2 n + 1}], {t, 0, 1}] // Denominator // Abs; a /@ Range[0, 45]
%Y Cf. A213447 (numerators).
%K nonn,frac
%O 0,1
%A _Vincenzo Librandi_, Apr 06 2020
|
