|
|
A260559
|
|
Numbers n such that (n^31+1)/(n+1) is prime.
|
|
2
|
|
|
2, 6, 10, 36, 65, 74, 78, 83, 106, 115, 120, 148, 161, 163, 168, 176, 189, 194, 197, 266, 270, 288, 331, 385, 399, 407, 410, 412, 413, 431, 468, 513, 524, 546, 569, 572, 578, 581, 600, 611, 625, 626, 647, 719, 723, 756, 832, 834, 849, 922, 986, 1006, 1007, 1047
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1, 10000], PrimeQ[(#^31 + 1)/(# + 1)] &]
|
|
PROG
|
(PARI) for(n=1, 10000, if(isprime((n^31+1)/(n+1)), print1(n, ", ")))
(Magma) [n: n in [1..10000] |IsPrime((n^31 + 1) div (n + 1))]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|