login
A154320
Primes p such that p^2 + 8*p - 4 is also prime.
3
3, 5, 7, 13, 17, 19, 23, 29, 53, 67, 79, 83, 89, 97, 107, 113, 137, 167, 179, 199, 229, 233, 239, 269, 277, 283, 313, 359, 379, 383, 397, 419, 457, 463, 487, 547, 563, 577, 599, 607, 617, 619, 647, 673, 677, 683, 709, 727, 733, 739, 787, 797, 809, 823, 827, 853
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[1000]], PrimeQ[#^2 + 8*# - 4]&] (* Vincenzo Librandi, Oct 30 2012 *)
PROG
(Magma) [p: p in PrimesUpTo(1000)| IsPrime(p^2 + 8*p - 4)]; // Vincenzo Librandi, Oct 30 2012
CROSSREFS
Sequence in context: A152820 A023208 A162358 * A173912 A049231 A268629
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jan 07 2009
STATUS
approved