A219742 Bernoulli denominators with 8 divisors in increasing order (without repetitions).
30, 42, 66, 138, 282, 354, 498, 642, 1002, 1074, 1362, 1434, 1578, 2082, 2154, 2298, 2658, 2802, 2874, 3018, 3378, 3522, 3882, 3954, 4314, 4962, 5034, 5178, 5322, 5898, 6114, 7122, 7338, 7554, 7698, 7842, 7914, 8202, 8634, 8922, 8994, 9138, 9714, 10722
Offset: 1
Keywords
Links
- Arkadiusz Wesolowski, Table of n, a(n) for n = 1..10000
- Paul Erdős and Samuel S. Wagstaff, Jr., The fractional parts of the Bernoulli numbers, Illinois J. Math. 24 (1980), pp. 104-112.
- Eric Weisstein's World of Mathematics, Bernoulli Number
- Index entries for sequences related to Bernoulli numbers
Programs
-
Mathematica
6*Prime@Flatten@Position[Table[p = Prime[n]; Length@Select[Divisors[p - 1] + 1, PrimeQ], {n, 277}], 3]
Comments