%I #9 Aug 22 2021 00:14:31

%S 457,1298,2168,3009,3481,3879,4720,5590,6431,6962,7301,8142,9012,9853,

%T 10443,10723,11564,12434,13275,13924,14145,14986,15856,16697,17405,

%U 17567,18408

%N Numbers k such that numerator of Bernoulli(2k) is divisible by the square of 59, the second irregular prime.

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/BernoulliNumber.html">Bernoulli Number</a>.

%F If we omit multiples of 3481 and take first differences, it appears that we get a common difference of {841, 870} repeated.

%t Select[ Range[ 9695], Mod[ Numerator[ BernoulliB[2# ]], 59^2] == 0 &]

%Y Cf. A000928, A091216, A092221.

%K nonn

%O 1,1

%A _Robert G. Wilson v_, Feb 26 2004

%E More terms from _Eric W. Weisstein_, Mar 19 2004