|
|
A260564
|
|
Numbers n such that (n^53+1)/(n+1) is prime.
|
|
1
|
|
|
10, 14, 40, 57, 111, 119, 406, 447, 475, 620, 646, 839, 848, 866, 909, 997, 1086, 1095, 1180, 1318, 1319, 1332, 1418, 1447, 1472, 1534, 1617, 1681, 1684, 1735, 1788, 1955, 2037, 2118, 2120, 2163, 2169, 2170, 2390, 2407, 2440, 2498, 2700, 2709, 2716, 2761, 2999
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1, 10000], PrimeQ[(#^53 + 1)/(# + 1)] &]
|
|
PROG
|
(PARI) for(n=1, 10000, if(isprime((n^53+1)/(n+1)), print1(n, ", ")))
(Magma) [n: n in [1..10000] |IsPrime((n^53 + 1) div (n + 1))]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|