A106016 Primes p such that 14*p - 3 and 14*p + 3 are both primes.

5, 11, 19, 41, 59, 71, 79, 149, 191, 229, 251, 379, 389, 479, 619, 631, 701, 709, 761, 821, 929, 941, 971, 1031, 1039, 1091, 1129, 1229, 1249, 1279, 1289, 1301, 1439, 1571, 1621, 1721, 2029, 2081, 2099, 2251, 2351, 2411, 2609, 2621, 2689, 2711, 2731, 2741

Offset

1,1

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000

Mathematica

Select[Prime[Range[400]], PrimeQ[14#+3]&&PrimeQ[14#-3]&]
Select[Prime[Range[400]], AllTrue[14#+{3, -3}, PrimeQ]&] (* Harvey P. Dale, Dec 27 2025 *)

Prog

(Magma) [p: p in PrimesUpTo(5000)|IsPrime(14*p+3) and IsPrime(14*p-3)]; // Vincenzo Librandi, Jan 30 2011

Crossrefs

Sequence in context: A225250 A105914 A289530 * A386122 A112794 A163419

Adjacent sequences: A106013 A106014 A106015 * A106017 A106018 A106019

Keyword

nonn

Author

Zak Seidov, May 05 2005

Status

approved