|
|
A260569
|
|
Numbers n such that (n^73+1)/(n+1) is prime.
|
|
1
|
|
|
18, 214, 280, 394, 422, 444, 447, 571, 745, 787, 796, 886, 954, 960, 987, 1012, 1055, 1140, 1194, 1212, 1224, 1227, 1349, 1583, 1598, 1640, 1686, 1714, 1723, 1750, 1931, 1962, 2032, 2036, 2110, 2223, 2339, 2774, 2827, 2859, 2957, 3063, 3192, 3236, 3285, 3485
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1, 10000], PrimeQ[(#^73 + 1)/(# + 1)] &]
|
|
PROG
|
(PARI) for(n=1, 10000, if(isprime((n^73+1)/(n+1)), print1(n, ", ")))
(Magma) [n: n in [1..10000] |IsPrime((n^73 + 1) div (n + 1))]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|