OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(1) = 6 because 6^8 - prime(6) = 1679603 is prime.
MAPLE
P:= select(isprime, [2, seq(i, i=3..10^5, 2)]):
select(t -> isprime(t^8 - P[t]), [seq(i, i=2..nops(P), 2)]); # Robert Israel, Jun 02 2023
MATHEMATICA
Select[Range[3000], PrimeQ[#^8 - Prime[#]] &] (* T. D. Noe, Jun 11 2012 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jonathan Vos Post, Jun 11 2012
STATUS
approved