A034937 Primes p of the form 6k-1 such that 2*p + 3 is prime.

5, 17, 29, 47, 53, 89, 113, 137, 167, 173, 197, 227, 269, 353, 383, 467, 503, 509, 557, 563, 599, 617, 647, 659, 743, 773, 797, 809, 827, 887, 929, 1013, 1109, 1187, 1193, 1217, 1259, 1277, 1307, 1373, 1427, 1499, 1523, 1553, 1559, 1583, 1607, 1613, 1733

Offset: 1

Author

Jud McCranie

Keywords

• nonn
• easy

Comments

Related to hyperperfect numbers of a certain form (form 1, theorem 1 in "A Study of Hyperperfect Numbers").

Links

• J. S. McCranie, A study of hyperperfect numbers, J. Int. Seqs. Vol. 3 (2000) #P00.1.3.

Crossrefs

Cf. A038536 and A034938.

Programs

Mathematica

Select[Range[5,2000,6],AllTrue[{#,2#+3},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jul 27 2019 *)

Extensions

Definition corrected by Jud McCranie, Jul 26 2019