A090810 Distinct numbers appearing as denominators of Bernoulli(2n) for n > 2, divided by 6.
1, 5, 7, 11, 23, 47, 55, 59, 83, 85, 107, 115, 133, 145, 167, 179, 227, 235, 239, 253, 263, 265, 295, 301, 347, 359, 383, 413, 415, 443, 455, 467, 479, 503, 517, 535, 553, 563, 581, 587, 647, 649, 659, 685, 719, 721, 745, 749, 781, 827, 835, 839, 863, 865, 887
Offset: 1
Keywords
Programs
-
Mathematica
Take[ Union[ Table[ Denominator[ BernoulliB[2n]], {n, 1, 500}]], 60]/6
Formula
A090801(n)/6 for n>2.