A090177 Numbers n such that numerator(Bernoulli(2*n)/(2*n)) is different from numerator(Bernoulli(2*n)/(2*n*(2*n+1))).

610, 1276, 1287, 1327, 1506, 1942, 1976, 2608, 2971, 3038, 3274, 3484, 3940, 4187, 4491, 4606, 4749, 4945, 5272, 5938, 6398, 6460, 6478, 6540, 6604, 6819, 7270, 7936, 8171, 8534, 8602, 8609, 8713, 9268, 9759, 9882, 9902, 9934, 10021

Offset

1,1

Comments

Coincides with A090495(n) + A090496(n) - 1, except for order of terms.

Links

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

Mathematica

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

Crossrefs

Cf. A090179, A001067, A090495.

Sequence in context: A137563 A301561 A204487 * A120719 A045730 A072317

Adjacent sequences: A090174 A090175 A090176 * A090178 A090179 A090180

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