A158017 Primes p such that 10*p-1 is also prime.

2, 3, 11, 23, 41, 71, 83, 101, 107, 113, 149, 167, 179, 227, 239, 269, 311, 317, 347, 353, 389, 479, 491, 521, 557, 569, 587, 647, 653, 683, 809, 821, 827, 839, 863, 911, 977, 983, 1091, 1229, 1259, 1283, 1289, 1301, 1367, 1373, 1439, 1487, 1493, 1607, 1619

Offset: 1

Author

Roger L. Bagula, Mar 11 2009

Keywords

• nonn
• easy

Comments

The family of prime sequences that generate primes k*p-1 for k = 2, 4, 6, 8, ... also comprises A005382 (k=2), A062737 (k=4), A158015 (k=6), and A158016 (k=8).

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A005382, A062737.

Programs

Magma

[p: p in PrimesUpTo(3000)|IsPrime(10*p-1)] // Vincenzo Librandi, Jan 29 2011

Mathematica

Flatten[Table[If[PrimeQ[n] && PrimeQ[10*n - 1], n, {}], {n, 1, 10000}]]
Select[Prime[Range[600]], PrimeQ[(10 # - 1)]&] (* Vincenzo Librandi, Apr 14 2013 *)