|
%I #10 Mar 29 2021 08:02:55
%S 31,55,109,133,157,187,211,265,289,314,343,367,421,445,471,499,523,
%T 577,601,628,655,679,733,757,785,811,835,889,913,942,967,991,1045,
%U 1069,1099,1123,1147,1201,1225,1256,1279,1303,1357,1381,1413,1435,1459,1513,1537
%N Numbers k such that numerator of Bernoulli(2*k) is divisible by 157, the eighth irregular prime and first irregular prime of index 2.
%H Amiram Eldar, <a href="/A092227/b092227.txt">Table of n, a(n) for n = 1..4000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/BernoulliNumber.html">Bernoulli Number</a>.
%t Select[ Range[ 1569], Mod[ Numerator[ BernoulliB[2# ]], 157] == 0 &]
%Y Cf. A000928, A073277, A091216, A092221, A092222, A092223, A092224, A092225, A092226, A092228, A092229.
%K nonn
%O 1,1
%A _Robert G. Wilson v_, Feb 25 2004
|
