A252091 Primes p such that p + 34 is prime.

3, 7, 13, 19, 37, 67, 73, 79, 97, 103, 139, 157, 163, 193, 199, 223, 229, 277, 283, 313, 349, 367, 397, 409, 433, 457, 487, 523, 607, 613, 619, 643, 709, 727, 739, 787, 823, 829, 853, 877, 907, 919, 937, 997, 1063, 1069, 1117, 1129, 1153, 1249, 1327, 1399, 1447

Offset: 1

Author

Vincenzo Librandi, Dec 15 2014

Keywords

• nonn
• easy

Examples

			19 is in this sequence because 19+34 = 53 is prime.
433 is in this sequence because 433+34 = 467 is prime.
		

Links

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

Programs

Magma

[NthPrime(n): n in [1..300] | IsPrime(NthPrime(n)+34)];

Mathematica

Select[Prime[Range[300]], PrimeQ[# + 34] &]

PARI

lista(nn) = {forprime(p=2, nn, if (isprime(p+34), print1(p, ", ")););} \\ Michel Marcus, Dec 15 2014