OFFSET
1,1
COMMENTS
All terms are primes.
a(8) > 10^5.
MATHEMATICA
Select[ Prime[ Range[1, 100000] ], PrimeQ[ (15^# + 4^#)/19 ]& ]
PROG
(PARI) is(n)=ispseudoprime((15^n+4^n)/19) \\ Charles R Greathouse IV, Jun 06 2017
CROSSREFS
KEYWORD
hard,nonn,more
AUTHOR
Robert Price, Jun 29 2013
STATUS
approved