A154320 Primes p such that p^2 + 8*p - 4 is also prime.

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

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

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

Cf. A154319, A154321.

Sequence in context: A152820 A023208 A162358 * A173912 A049231 A268629

Adjacent sequences: A154317 A154318 A154319 * A154321 A154322 A154323

Keyword

nonn,easy

Author

Vincenzo Librandi, Jan 07 2009

Status

approved