OFFSET
1,1
COMMENTS
a(n)==0 (mod 7). - Labos Elemer
Conjecture: All terms are of the form 7 + 21*j. - Vaclav Kotesovec, Apr 29 2014
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 1..4048
Vaclav Kotesovec, Graph of a(n)/n. Limit of a(n)/n (if it exists) is not 21, but ~ 25.9...
MATHEMATICA
Select[21*Range[0, 100]+7, GCD[Numerator[BernoulliB[2#]], Denominator[BernoulliB[2#-2]]]==7&] (* Vaclav Kotesovec, Apr 29 2014 *)
PROG
(PARI) isok(n) = gcd(numerator(bernfrac(2*n)), denominator(bernfrac(2*n-2))) == 7; \\ Michel Marcus, Mar 06 2014
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Mar 23 2002
STATUS
approved