|
|
A260570
|
|
Numbers n such that (n^79+1)/(n+1) is prime.
|
|
1
|
|
|
2, 20, 22, 35, 47, 72, 109, 133, 184, 211, 226, 259, 352, 470, 559, 720, 785, 800, 823, 842, 895, 1003, 1145, 1172, 1213, 1291, 1318, 1375, 1441, 1453, 1460, 1461, 1467, 1477, 1604, 1608, 1637, 1654, 1695, 1703, 1807, 1831, 1834, 1903, 1948, 2035, 2060, 2065
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1, 10000], PrimeQ[(#^79 + 1)/(# + 1)] &]
|
|
PROG
|
(PARI) for(n=1, 10000, if(isprime((n^79+1)/(n+1)), print1(n, ", ")))
(Magma) [n: n in [1..10000] |IsPrime((n^79 + 1) div (n + 1))]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|