|
|
A346717
|
|
a(n) = denominator(Sum_{k=1..2*n} Bernoulli(1 + k) / ((1 + k) * k^(1 + k))).
|
|
2
|
|
|
1, 12, 9720, 212625000, 350211660750000, 165830100163770908250000, 615072417899094252893747931729750000, 186290124133142953867176980119009688414239626750000, 309270713892913107006055533400699678031452505346679687500000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MATHEMATICA
|
r[n_] := Sum[BernoulliB[1 + k] / ((1 + k) * k^(1 + k)), {k, 1, 2*n}];
Table[r[n], {n, 0, 10}] // Denominator
|
|
PROG
|
(PARI) a(n) = denominator(sum(k=1, 2*n, bernfrac(1+k)/((1+k)*k^(1+k)))); \\ Michel Marcus, Aug 12 2021
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|