A092224 Numbers k such that the numerator of Bernoulli(2*k) is divisible by 103, the fifth irregular prime.
12, 63, 103, 114, 165, 206, 216, 267, 309, 318, 369, 412, 420, 471, 515, 522, 573, 618, 624, 675, 721, 726, 777, 824, 828, 879, 927, 930, 981, 1030, 1032, 1083, 1133, 1134, 1185, 1236, 1287, 1338, 1339, 1389, 1440, 1442, 1491, 1542, 1545, 1593, 1644, 1648
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..3700
- Eric Weisstein's World of Mathematics, Bernoulli Number.
Crossrefs
Programs
-
Mathematica
Select[ Range[ 1694], Mod[ Numerator[ BernoulliB[2# ]], 103] == 0 &] Select[Union[Table[2n*103,{n,1,100}],Table[24+102*n,{n,0,100}]], #<=10000&]/2 (* Alexander Adamchuk, Jul 31 2006 *)
Comments