Voozh

A346716

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

0, 1, 809, 17696929, 29148363745769, 13802156299837263870439, 51192911535225069982129975520643227, 15505058537999075182938597423297191148526445182931, 25740819838475027138304706528711851561870640774224535090837

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

OFFSET

0,3

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}] // Numerator

PROG

(PARI) a(n) = numerator(sum(k=1, 2*n, bernfrac(1+k)/((1+k)*k^(1+k)))); \\ Michel Marcus, Aug 12 2021

CROSSREFS

Cf. A346717 (denominator), A346718 (rational limit).

Sequence in context: A265984 A332848 A160561 * A156404 A381893 A282376

Adjacent sequences: A346713 A346714 A346715 * A346717 A346718 A346719

KEYWORD

nonn,frac

AUTHOR

Peter Luschny, Aug 11 2021

STATUS

approved

URL: https://oeis.org/A346716

⇱ A346716 - OEIS