A112391 Primes p such that 23*p + 2 is also prime.

3, 7, 19, 37, 43, 67, 103, 157, 193, 277, 337, 367, 373, 379, 397, 439, 457, 463, 547, 607, 829, 859, 877, 919, 1009, 1033, 1039, 1117, 1129, 1213, 1249, 1297, 1429, 1543, 1579, 1627, 1657, 1699, 1723, 1759, 1783, 1789, 1867, 1993, 1999, 2053, 2083, 2089

Offset

1,1

Links

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

Example

If p=277 then 23*p + 2 = 6373 (prime).

Mathematica

Select[Prime[Range[400]], PrimeQ[23#+2]&] (* Harvey P. Dale, Sep 26 2021 *)

Prog

(PARI) forprime(p=2, 5000, if(isprime(23*p+2), print1(p, ", "))) // Lambert Herrgesell, Dec 09 2005
(Magma) [p: p in PrimesUpTo(3000)|  IsPrime(23*p+2)] // Vincenzo Librandi, Jan 29 2011

Crossrefs

Cf. A023208.

Sequence in context: A227502 A268065 A049490 * A127928 A298125 A047025

Adjacent sequences: A112388 A112389 A112390 * A112392 A112393 A112394

Keyword

nonn

Author

Parthasarathy Nambi, Dec 04 2005

Extensions

More terms from Lambert Herrgesell (zero815(AT)googlemail.com), Dec 09 2005

Status

approved