A153591 - OEIS

A153591

Primes p such that 6p^2+6p+1 is also prime.

2, 3, 5, 7, 13, 19, 23, 31, 41, 43, 47, 67, 73, 97, 101, 107, 109, 137, 151, 199, 233, 239, 241, 251, 263, 283, 317, 331, 337, 353, 359, 379, 383, 419, 421, 431, 439, 449, 463, 541, 569, 571, 577, 601, 619, 647, 691, 701, 769, 823, 839, 877, 907, 929, 953, 971

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

EXAMPLE

For p = 2, 6p^2+6p+1 = 37 is prime; for p = 47, 6p^2+6p+1 = 13537 is prime.

MATHEMATICA

Select[Prime[Range[200]], PrimeQ[6#^2 + 6# + 1] &] (* Vincenzo Librandi, Oct 15 2012 *)

PROG

(Magma) [ p: p in PrimesUpTo(1000) | IsPrime(6*p^2+6*p+1) ];

CROSSREFS