A272140 Numbers n such that Bernoulli number B_{n} has denominator 1590.

52, 104, 988, 1976, 3068, 3172, 5252, 5356, 5564, 6136, 6344, 7124, 7748, 8164, 8684, 10244, 10712, 12532, 13364, 13676, 13988, 14092, 16276, 16328, 17212, 17368, 17524, 18044, 18356, 19084, 19916, 20228, 20488, 20644, 22828, 23348, 23764

Offset: 1

Author

Paolo P. Lava, Apr 21 2016

Keywords

• nonn

Comments

1590 = 2 * 3 * 5 * 53.

All terms are multiple of a(1) = 52.

For these numbers numerator(B_{n}) mod denominator(B_{n}) = 1507.

Examples

			Bernoulli B_{52} is -801165718135489957347924991853/1590, hence 52 is in the sequence.
		

Links

• Seiichi Manyama, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A045979, A051222, A051225, A051226, A051227, A051228, A051229, A051230, A119456, A119480, A249134, A255684, A271634, A271635, A272138, A272139, A272183, A272184, A272185, A272186.

Programs

Maple

with(numtheory): P:=proc(q,h) local n;  for n from 2 by 2 to q do
if denom(bernoulli(n))=h then print(n); fi; od; end: P(10^6,1590);

Mathematica

Select[Range[0, 1000], Denominator[BernoulliB[#]] == 1590 &] (* Robert Price, Apr 21 2016 *)

PARI

isok(n) = denominator(bernfrac(n)) == 1590; \\ Michel Marcus, Apr 22 2016

Extensions

a(12)-a(15) from Michel Marcus, Apr 22 2016

More terms from Altug Alkan, Apr 22 2016