OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..300
MATHEMATICA
Select[Range[2, 1000], PrimeQ[(#^97 - 1)/(# - 1)] &] (* T. D. Noe, Sep 26 2012 *)
PROG
(PARI) is(n)=isprime((n^97-1)/(n-1)) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Tim Johannes Ohrtmann, Sep 26 2012
EXTENSIONS
More terms from T. D. Noe, Sep 26 2012
STATUS
approved