A092133 Prime numerators of Bernoulli numbers, i.e., numerators of Bernoulli numbers with indices A092132.

5, -691, 7, -3617, 43867, -26315271553053477373, 1520097643918070802691

Offset

1,1

Links

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

Eric Weisstein's World of Mathematics, Bernoulli Number

Mathematica

Reap[For[n = 1, n <= 1000, n++, If[PrimeQ[nu = Numerator[BernoulliB[n]]], Print[nu]; Sow[nu]]]][[2, 1]] (* Jean-François Alcover, Oct 31 2012 *)

Crossrefs

Cf. A092132.

Sequence in context: A176840 A000367 A176546 * A274025 A281585 A071772

Adjacent sequences: A092130 A092131 A092132 * A092134 A092135 A092136

Keyword

sign,more

Author

Eric W. Weisstein, Feb 22 2004

Status

approved