|
|
A217076
|
|
Numbers n such that (n^37-1)/(n-1) is prime.
|
|
6
|
|
|
61, 77, 94, 97, 99, 113, 126, 130, 134, 147, 161, 172, 187, 202, 208, 246, 261, 273, 285, 302, 320, 432, 444, 503, 523, 525, 563, 666, 680, 709, 740, 757, 787, 902, 962, 964, 969, 1013, 1109, 1165, 1186, 1219, 1351, 1528, 1587, 1660, 1698, 1710, 1754, 1811, 1972
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[2, 2000], PrimeQ[(#^37 - 1)/(# - 1)] &] (* T. D. Noe, Sep 26 2012 *)
|
|
PROG
|
(Magma) [n: n in [2..2000] |IsPrime((n^37 - 1) div (n - 1))]; // Vincenzo Librandi, Sep 28 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|