|
%I #13 Mar 29 2021 08:03:09
%S 82,210,257,338,466,514,594,722,771,850,978,1028,1106,1234,1285,1362,
%T 1490,1542,1618,1746,1799,1874,2002,2056,2130,2258,2313,2386,2514,
%U 2570,2642,2770,2827,2898,3026,3084,3154,3282,3341,3410,3538,3598,3666,3794
%N Numbers k such that numerator of Bernoulli(2*k) is divisible by 257, the tenth irregular prime.
%H Amiram Eldar, <a href="/A092229/b092229.txt">Table of n, a(n) for n = 1..1500</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/BernoulliNumber.html">Bernoulli Number</a>.
%t Select[ Range[ 3854], Mod[ Numerator[ BernoulliB[2# ]], 257] == 0 &]
%Y Cf. A000928, A091216, A092221, A092222, A092223, A092224, A092225, A092226, A092227, A092228.
%K nonn
%O 1,1
%A _Robert G. Wilson v_, Feb 25 2004
|
