|
|
A260567
|
|
Numbers n such that (n^67+1)/(n+1) is prime.
|
|
1
|
|
|
5, 10, 23, 33, 40, 54, 193, 326, 330, 364, 375, 382, 388, 404, 438, 449, 562, 625, 626, 683, 700, 765, 797, 807, 1001, 1017, 1136, 1181, 1216, 1242, 1249, 1254, 1286, 1386, 1412, 1482, 1581, 1656, 1748, 1832, 1873, 1921, 2017, 2038, 2061, 2166, 2193, 2204, 2253
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1, 10000], PrimeQ[(#^67 + 1)/(# + 1)] &]
|
|
PROG
|
(PARI) for(n=1, 10000, if(isprime((n^67+1)/(n+1)), print1(n, ", ")))
(Magma) [n: n in [1..10000] |IsPrime((n^67 + 1) div (n + 1))]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|