A106065 Primes p such that 1*p+18 and 18*p+1 are primes.

11, 29, 41, 71, 79, 139, 149, 181, 251, 379, 401, 431, 491, 569, 659, 701, 709, 809, 821, 991, 1021, 1051, 1231, 1289, 1381, 1471, 1549, 1759, 1871, 1931, 1999, 2069, 2221, 2251, 2381, 2459, 2591, 2671, 2711, 2909, 2939, 3301, 3371, 3499, 3511, 3539, 3709

Offset: 1

Author

Zak Seidov, May 07 2005

Keywords

• nonn

Comments

Subsequence of A153418. - Michel Marcus, Dec 27 2014

Crossrefs

Cf. A153418 (p and p+18 are prime).

Programs

Magma

[p: p in PrimesUpTo(10000)| IsPrime(p+18) and IsPrime(18*p+1)] // Vincenzo Librandi, Nov 13 2010

Mathematica

Select[Prime[Range[220]], PrimeQ[18#+1]&&PrimeQ[1#+18]&]