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

Author

Parthasarathy Nambi, Dec 04 2005

Keywords

• nonn

Examples

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

Links

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

Crossrefs

Cf. A023208.

Programs

Magma

[p: p in PrimesUpTo(3000)|  IsPrime(23*p+2)]; // Vincenzo Librandi, Jan 29 2011

Mathematica

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

PARI

forprime(p=2,5000,if(isprime(23*p+2),print1(p,","))) \\ Lambert Herrgesell, Dec 09 2005

Extensions

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