A051654 Primes p such that 30030*p + 1 is also prime.

5, 11, 13, 29, 31, 41, 47, 61, 67, 79, 89, 127, 139, 149, 179, 181, 191, 197, 269, 307, 337, 347, 367, 383, 421, 467, 487, 541, 547, 569, 613, 641, 727, 809, 811, 821, 823, 883, 887, 941, 1031, 1033, 1087, 1093, 1103, 1117, 1193, 1201, 1237, 1259, 1279, 1283

Offset: 1

Author

Labos Elemer

Keywords

• nonn

Examples

			p = 5 and 30030*p + 1 = 150151 are both primes.
		

Links

• Michael De Vlieger, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A005384, A002110, A005385, A051651.

Programs

Magma

[p: p in PrimesUpTo (1300) | IsPrime(30030*p+1)]; // Vincenzo Librandi, Aug 16 2017

Mathematica

Select[Prime@ Range@ 210, PrimeQ[30030 # + 1] &] (* Michael De Vlieger, Aug 15 2017 *)

PARI

isok(p) = isprime(p) && isprime(30030*p+1); \\ Michel Marcus, Dec 19 2013

Formula

a(n) = (A051651(n)-1)/30030. - Amiram Eldar, Feb 24 2025

Extensions

More terms from Michel Marcus, Dec 19 2013