A106017 Primes p such that 16*p +- 3 are primes.

11, 29, 41, 59, 101, 109, 199, 251, 601, 619, 631, 641, 739, 811, 1021, 1201, 1319, 1439, 1609, 1621, 1789, 2099, 2141, 2311, 2531, 2551, 2969, 3049, 3109, 3209, 4001, 4099, 4201, 4259, 4481, 4591, 4651, 4721, 5009, 5039, 5081, 5449, 5531, 5569, 5779

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Select[Prime[Range[400]], PrimeQ[16#+3]&&PrimeQ[16#-3]&]
Select[Prime[Range[800]], AllTrue[16#+{3, -3}, PrimeQ]&] (* Harvey P. Dale, Oct 03 2024 *)

Prog

(Magma) [p: p in PrimesUpTo(100000)| IsPrime(16*p-3) and IsPrime(16*p+3)]; // Vincenzo Librandi, Nov 13 2010

Crossrefs

Sequence in context: A350420 A240678 A087693 * A343418 A106065 A247089

Adjacent sequences: A106014 A106015 A106016 * A106018 A106019 A106020

Keyword

nonn

Author

Zak Seidov, May 05 2005

Status

approved