OFFSET
1,1
COMMENTS
All terms are primes.
No other terms < 1000000.
LINKS
Jon Grantham and Andrew Granville, Fibonacci primes, primes of the form 2^n-k and beyond, arXiv:2307.07894 [math.NT], 2023.
MATHEMATICA
k=7; Select[ Prime[ Range[1, 200] ], PrimeQ[ ((k+3)^# - 3^#)/k ]& ]
PROG
(PARI) forprime(p=2, 1e4, if(ispseudoprime((10^p-3^p)/7), print1(p", "))) \\ Charles R Greathouse IV, Jun 05 2011
CROSSREFS
KEYWORD
hard,nonn
AUTHOR
Alexander Adamchuk, Feb 11 2007
EXTENSIONS
a(6)-a(7) from Robert Price, Jun 04 2011
a(8)-a(9) from Jon Grantham, Jul 29 2023
STATUS
approved