login
A271635
Numbers n such that Bernoulli number B_{n} has denominator 138.
27
22, 154, 242, 286, 374, 814, 1034, 1078, 1298, 1342, 1474, 1562, 1694, 1738, 2134, 2222, 2354, 2794, 3014, 3058, 3146, 3278, 3454, 3586, 3674, 3982, 4114, 4246, 4334, 4378, 4906, 4994, 5654, 5698, 5786, 5918, 5962, 6094, 6226, 6754, 6842, 6886, 6974, 7414, 7634, 7678, 7766
OFFSET
1,1
COMMENTS
138 = 2 * 3 * 23.
All terms are multiple of a(1) = 22.
For these numbers numerator(B_{n}) mod denominator(B_{n}) = 17.
LINKS
EXAMPLE
Bernoulli B_{22} is 854513/138, hence 22 is in the sequence.
MAPLE
with(numtheory): P:=proc(q, h) local n; for n from 2 by 2 to q do
if denom(bernoulli(n))=h then print(n); fi; od; end: P(10^6, 138);
MATHEMATICA
Select[Range[0, 1000], Denominator[BernoulliB[#]] == 138 &] (* Robert Price, Apr 21 2016 *)
PROG
(PARI) isok(n) = denominator(bernfrac(n)) == 138; \\ Michel Marcus, Apr 22 2016
KEYWORD
nonn,easy
AUTHOR
Paolo P. Lava, Apr 21 2016
EXTENSIONS
More terms from Michel Marcus, Apr 22 2016
STATUS
approved