A217082 Numbers n such that (n^61-1)/(n-1) is prime.
2, 19, 69, 88, 138, 155, 205, 234, 336, 420, 425, 455, 470, 525, 555, 561, 608, 626, 667, 674, 766, 779, 846, 851, 937, 971, 998, 1053, 1055, 1112, 1137, 1263, 1329, 1383, 1445, 1448, 1499, 1544, 1551, 1578, 1640, 1689, 1724, 1750, 1793, 1868, 2143, 2241, 2358
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[n: n in [2..2400] |IsPrime((n^61 - 1) div (n - 1))]; // Vincenzo Librandi, Sep 28 2012
-
Mathematica
Select[Range[2, 2400], PrimeQ[(#^61 - 1)/(# - 1)] &] (* T. D. Noe, Sep 26 2012 *)
-
PARI
is(n)=isprime((n^61-1)/(n-1)) \\ Charles R Greathouse IV, Feb 17 2017
Extensions
More terms from T. D. Noe, Sep 26 2012