OFFSET
1,1
COMMENTS
All terms are primes.
a(10) > 10^5. - Robert Price, May 05 2013
MATHEMATICA
k=12; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n, 1, 100}]
Select[Range[1100], PrimeQ[(12^#+5^#)/17]&] (* Harvey P. Dale, Jul 24 2012 *)
PROG
(PARI) is(n)=isprime((12^n+5^n)/17) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
hard,more,nonn
AUTHOR
Alexander Adamchuk, Feb 27 2007
EXTENSIONS
Two more terms (a(7) and a(8)) from Harvey P. Dale, Jul 24 2012
a(9) from Robert Price, May 05 2013
STATUS
approved