|
|
A217079
|
|
Numbers n such that (n^47-1)/(n-1) is prime.
|
|
6
|
|
|
5, 17, 19, 55, 62, 75, 89, 98, 99, 132, 172, 186, 197, 220, 268, 278, 279, 288, 439, 443, 496, 579, 583, 587, 742, 777, 825, 911, 966, 1003, 1029, 1155, 1202, 1267, 1377, 1461, 1472, 1473, 1530, 1562, 1634, 1682, 1705, 1783, 1848, 1852, 1885, 1900, 1943, 1957
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[2, 2000], PrimeQ[(#^47 - 1)/(# - 1)] &] (* T. D. Noe, Sep 26 2012 *)
|
|
PROG
|
(Magma) [n: n in [2..2000] |IsPrime((n^47 - 1) div (n - 1))]; // Vincenzo Librandi, Sep 28 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|