OFFSET
1,2
COMMENTS
No more terms through 50000. - Ryan Propper, Dec 04 2008
a(20) > 2*10^5. - Robert Price, Oct 22 2014
MATHEMATICA
Do[ f = 19^n - 2; If[ PrimeQ[ f ], Print[ {n, f} ] ], {n, 1, 1000} ]
PROG
(Magma) [n: n in [0..1000] | IsPrime(19^n-2)]; // Vincenzo Librandi, Oct 23 2014
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Alexander Adamchuk, Mar 14 2007
EXTENSIONS
1124 from Stefan Steinerberger, May 05 2007
7592 from Ryan Propper, Dec 31 2007
Additional terms from Ryan Propper, Dec 04 2008
a(19) from Robert Price, Oct 22 2014
STATUS
approved