A119656 Denominator of BernoulliB(4*prime(n))/30.
1, 91, 11, 29, 23, 53, 1, 1, 47, 59, 1, 149, 83, 173, 1, 107, 1, 1, 269, 1, 293, 317, 167, 179, 389, 1, 1, 1, 1, 227, 509, 263, 1, 557, 1, 1, 1, 653, 1, 347, 359, 1, 383, 773, 1, 797, 1, 1, 1, 1, 467, 479, 1, 503, 1, 1, 1, 1, 1109, 563, 1, 587, 1229, 1, 1, 1, 1, 1, 1, 1, 1, 719
Offset: 1
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[Denominator(Bernoulli(4*NthPrime(n)))/30: n in [1..80]]; // G. C. Greubel, Feb 10 2019
-
Mathematica
Table[Denominator[BernoulliB[4Prime[n]]]/30,{n,1,80}]
-
PARI
{a(n) = denominator(bernfrac(4*prime(n)))/30}; vector(80, n, a(n)) \\ G. C. Greubel and Michel Marcus, Feb 10 2019
-
Sage
[denominator(bernoulli(4*nth_prime(n)))/30 for n in (1..80)] # G. C. Greubel, Feb 10 2019
Formula
a(n) = denominator(BernoulliB(4*prime(n)))/30.
Comments