|
%I #10 Mar 29 2021 08:03:02
%S 42,158,233,274,390,466,506,622,699,738,854,932,970,1086,1165,1202,
%T 1318,1398,1434,1550,1631,1666,1782,1864,1898,2014,2097,2130,2246,
%U 2330,2362,2478,2563,2594,2710,2796,2826,2942,3029,3058,3174,3262,3290,3406,3495
%N Numbers k such that numerator of Bernoulli(2*k) is divisible by 233, the ninth irregular prime.
%H Amiram Eldar, <a href="/A092228/b092228.txt">Table of n, a(n) for n = 1..1600</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/BernoulliNumber.html">Bernoulli Number</a>.
%t Select[ Range[ 3521], Mod[ Numerator[ BernoulliB[2# ]], 233] == 0 &]
%Y Cf. A000928, A091216, A092221, A092222, A092223, A092224, A092225, A092226, A092227, A092229.
%K nonn
%O 1,1
%A _Robert G. Wilson v_, Feb 25 2004
|
