The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #10 Mar 29 2021 08:01:49
%S 34,84,101,134,184,202,234,284,303,334,384,404,434,484,505,534,584,
%T 606,634,684,707,734,784,808,834,884,909,934,984,1010,1034,1084,1111,
%U 1134,1184,1212,1234,1284,1313,1334,1384,1414,1434,1484,1515,1534,1584,1616
%N Numbers k such that numerator of Bernoulli(2*k) is divisible by 101, the fourth irregular prime.
%H Amiram Eldar, <a href="/A092223/b092223.txt">Table of n, a(n) for n = 1..3800</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/BernoulliNumber.html">Bernoulli Number</a>.
%t Select[ Range[ 1633], Mod[ Numerator[ BernoulliB[2# ]], 101] == 0 &]
%Y Cf. A000928, A091216, A092221, A092222, A092224, A092225, A092226, A092227, A092228, A092229.
%K nonn
%O 1,1
%A _Robert G. Wilson v_, Feb 25 2004