OFFSET
1,1
COMMENTS
Subsequence of primes of A216980. - Michel Marcus, Aug 24 2015
EXAMPLE
53^7 + 2 = 1174711139839 is a prime.
MAPLE
A261537:=n->`if`(isprime(n) and isprime(n^7+2), n, NULL): seq(A261537(n), n=1..5*10^4); # Wesley Ivan Hurt, Apr 14 2017
MATHEMATICA
Select[Prime[Range[2500]], PrimeQ[#^7 + 2] &]
PROG
(Magma) [p: p in PrimesUpTo(20000) | IsPrime(p^7+2)];
(PARI) first(m)=my(v=vector(m)); i=1; for(j=1, m, while(!isprime((prime(i)^7)+2), i++); v[j]=prime(i); i++); v; \\ Anders Hellström, Aug 24 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Aug 24 2015
STATUS
approved