A106019 Primes p such that 26*p +- 3 are primes.

29, 41, 151, 179, 239, 241, 269, 379, 479, 619, 661, 701, 769, 1039, 1049, 1231, 1291, 1499, 1579, 1669, 1999, 2239, 2269, 2311, 2729, 2971, 3209, 3259, 3319, 3371, 3461, 3469, 3499, 3779, 3889, 4021, 4129, 4271, 4561, 4649, 4759, 4799, 5081, 5419, 5449

Offset

1,1

Links

Table of n, a(n) for n=1..45.

Mathematica

Select[Prime[Range[400]], PrimeQ[26#+3]&&PrimeQ[26#-3]&]
Select[Prime[Range[800]], AllTrue[26#+{3, -3}, PrimeQ]&] (* Harvey P. Dale, May 10 2023 *)

Prog

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

Crossrefs

Sequence in context: A308795 A106075 A238666 * A084163 A181622 A355599

Adjacent sequences: A106016 A106017 A106018 * A106020 A106021 A106022

Keyword

nonn

Author

Zak Seidov, May 05 2005

Status

approved