A346717 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A346717

a(n) = denominator(Sum_{k=1..2*n} Bernoulli(1 + k) / ((1 + k) * k^(1 + k))).

1, 12, 9720, 212625000, 350211660750000, 165830100163770908250000, 615072417899094252893747931729750000, 186290124133142953867176980119009688414239626750000, 309270713892913107006055533400699678031452505346679687500000

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

LINKS

Table of n, a(n) for n=0..8.

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

Cf. A346716 (numerator), A346718 (rational limit).

Sequence in context: A345679 A012532 A343699 * A012732 A001322 A159411

Adjacent sequences: A346714 A346715 A346716 * A346718 A346719 A346720

KEYWORD

nonn,frac

AUTHOR

Peter Luschny, Aug 11 2021

STATUS

approved