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,1

Comments

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

Links

Table of n, a(n) for n=1..49.

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

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 *)

Crossrefs

Cf. A038536 and A034938.

Sequence in context: A027703 A075695 A146278 * A024351 A246325 A086523

Adjacent sequences: A034934 A034935 A034936 * A034938 A034939 A034940

Keyword

nonn,easy

Author

Jud McCranie

Extensions

Definition corrected by Jud McCranie, Jul 26 2019

Status

approved