A158296 Primes p such that 12*p^2 -+ 1 are twin primes.

3, 11, 13, 17, 29, 227, 283, 491, 647, 739, 953, 1151, 1471, 1511, 1879, 1889, 2129, 2251, 2297, 2593, 2633, 3347, 3539, 3559, 3643, 3877, 3919, 4231, 4327, 4547, 4673, 4801, 4999, 5051, 6451, 6653, 6737, 6779, 6983, 7741, 7937, 8179, 8219, 8231, 8389

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Example

3 is in the sequence since 12*3^2 = 108 and (107, 109) are twin primes.

Mathematica

lst={}; Do[p=Prime[n]; a=12*p^2; If[PrimeQ[a-1]&&PrimeQ[a+1], AppendTo[lst, p]], {n, 7!}]; lst
Select[Prime[Range[1200]], AllTrue[12#^2+{1, -1}, PrimeQ]&] (* Harvey P. Dale, Sep 15 2021 *)

Crossrefs

Cf. A120364, A088483, A158295.

Sequence in context: A045426 A020614 A191026 * A160025 A045427 A373726

Adjacent sequences: A158293 A158294 A158295 * A158297 A158298 A158299

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Mar 15 2009

Status

approved