This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A090177 #3 Mar 30 2012 17:30:56
%S A090177 610,1276,1287,1327,1506,1942,1976,2608,2971,3038,3274,3484,3940,4187,
%T A090177 4491,4606,4749,4945,5272,5938,6398,6460,6478,6540,6604,6819,7270,
%U A090177 7936,8171,8534,8602,8609,8713,9268,9759,9882,9902,9934,10021
%N A090177 Numbers n such that numerator(Bernoulli(2*n)/(2*n)) is different from numerator(Bernoulli(2*n)/(2*n*(2*n+1))).
%C A090177 Coincides with A090495(n) + A090496(n) - 1, except for order of terms.
%t A090177 Do[ If[ Numerator[ BernoulliB[2n] / (2n)] != Numerator[ BernoulliB[2n] / (2n(2n + 1))], Print[n]], {n, 1, 10030}]
%Y A090177 Cf. A090179, A001067, A090495.
%K A090177 nonn
%O A090177 1,1
%A A090177 mohammed bouayoun (bouyao(AT)wanadoo.fr), Feb 04 2004
%E A090177 a(6)-a(39) from _Robert G. Wilson v_, Feb 09 2004