OFFSET
1,1
COMMENTS
Primes p such that A069229(n)+2 is prime. - Michel Marcus, Jan 12 2016
a(11) > 612649. - Robert Price, May 22 2016
EXAMPLE
p=11: ((2^11)*11)+11+2 = 22541 (is prime).
MATHEMATICA
Select[Prime[Range[4000]], PrimeQ[# 2^# + # + 2] &] (* Vincenzo Librandi, Jan 19 2016 *)
PROG
(PARI) lista(nn) = forprime(p=2, nn, if(ispseudoprime(p*2^p + p + 2), print1(p, ", "))); \\ Altug Alkan, Jan 12 2016
(Magma) [p: p in PrimesUpTo(200) | IsPrime(p*2^p+p+2)]; // Vincenzo Librandi, Jan 19 2016
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Emre APARI, Jan 11 2016
EXTENSIONS
a(10) from Giovanni Resta, Apr 10 2016
STATUS
approved