A271347 Primes p such that p + 38 is also prime.

3, 5, 23, 29, 41, 59, 71, 89, 101, 113, 173, 191, 233, 239, 269, 293, 311, 359, 383, 401, 419, 449, 461, 503, 509, 563, 569, 593, 653, 701, 719, 773, 821, 839, 881, 929, 953, 971, 983, 1013, 1031, 1049, 1091, 1163, 1193, 1259, 1283, 1289

Offset: 1

Author

Karl V. Keller, Jr., Apr 04 2016

Keywords

• nonn

Comments

A134118 is a subsequence of this sequence.

Examples

			3 such that 3 + 38 = 41 is also prime.
5 such that 5 + 38 = 43 is also prime.
		

Links

• Karl V. Keller, Jr., Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000040, A134118.

Programs

Mathematica

Select[Prime[Range[250]], PrimeQ[# + 38] &] (* Alonso del Arte, Apr 05 2016 *)

PARI

lista(nn) = forprime(p=2, nn, if(ispseudoprime(p+38), print1(p, ", "))); \\ Altug Alkan, Apr 05 2016

Python

from sympy import isprime
for i in range(3, 2001,2):
  if isprime(i) and isprime(i+38): print (i,end=', ')