A327033 N(p-1)/p + D(p-1)/p^2 with p the n-th prime and B(k) = N(k)/D(k) the k-th Bernoulli number.

0, 1, 1, 1, 1, -37, -211, 2311, 37153, -818946931, 277930363757, -711223555487930419, -6367871182840222481, 35351107998094669831, 12690449182849194963361, -15116334304443206742413679091, 1431925649981017658678758915153153, -19921854762028779869513196624259348280501

Offset

1,6

Comments

a(n) is an integer, as conjectured by Thomas Ordowski and proved by the author in A309132 and A326690.

Ordowski also conjectured that the sequence is a subsequence of A174341.

Links

Table of n, a(n) for n=1..18.

Wikipedia, Bernoulli number

Example

Prime(6) = 13 and B(12) = -691/2730, so a(6) = -691/13 + 2730/13^2 = -37.

Mathematica

a[n_] := With[{p = Prime[n]}, With[{b = BernoulliB[p - 1]}, (p  Numerator[b] + Denominator[b])/p^2]];
Table[a[n], {n, 1, 18}]

Prog

(PARI) a(n) = my(p = prime(n), b = bernfrac(p-1)); numerator(b)/p + denominator(b)/p^2; \\ Michel Marcus, Aug 16 2019

Crossrefs

Cf. A174341, A309132, A326690.

Sequence in context: A221888 A156569 A141984 * A052166 A142010 A230006

Adjacent sequences: A327030 A327031 A327032 * A327034 A327035 A327036

Keyword

sign

Author

Jonathan Sondow, Aug 15 2019

Status

approved