A090179 Ratio of numerator(Bernoulli(2*n)/(2*n)) to numerator(Bernoulli(2*n)/(2*n*(2*n+1))) for n's for which they are different.

37, 37, 103, 59, 131, 37, 67, 37, 283, 59, 37, 101, 37, 67, 691, 37, 59, 157, 37, 37, 67, 59, 617, 103, 37, 593, 37, 37, 59, 101, 37, 67, 157, 37, 149, 59, 233, 37, 131

Offset

1,1

Links

Table of n, a(n) for n=1..39.

Mathematica

Do[ If[ r = Numerator[ BernoulliB[2n]/(2n)] / Numerator[ BernoulliB[2n]/(2n(2n + 1))]; r != 1, Print[r]], {n, 1, 10030}]

Crossrefs

Cf. A090177, A001067, A090495.

Sequence in context: A201828 A291478 A257810 * A107248 A219402 A219450

Adjacent sequences: A090176 A090177 A090178 * A090180 A090181 A090182

Keyword

nonn

Author

mohammed bouayoun (bouyao(AT)wanadoo.fr), Feb 04 2004

Extensions

a(6)-a(39) from Robert G. Wilson v, Feb 09 2004

Status

approved