A164567 Primes p such that 5*p-6 and 5*p+6 are prime numbers.

5, 7, 13, 19, 29, 37, 41, 47, 79, 83, 97, 103, 149, 163, 211, 257, 293, 313, 359, 379, 401, 421, 449, 509, 523, 541, 547, 601, 643, 653, 673, 691, 701, 733, 821, 853, 883, 911, 929, 937, 1009, 1129, 1171, 1217, 1367, 1381, 1423, 1511, 1567, 1619, 1637, 1787

Offset

1,1

Comments

Primes of the form A087681(k)/5, any k [R. J. Mathar, Sep 17 2009]

Links

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

Mathematica

lst={}; Do[p=Prime[n]; If[PrimeQ[5*p-6]&&PrimeQ[5*p+6], AppendTo[lst, p]], {n, 6!}]; lst
Select[Prime[Range[300]], AllTrue[5#+{6, -6}, PrimeQ]&] (* Harvey P. Dale, Jun 09 2022 *)

Crossrefs

Cf. A106015, A124098, A125272, A127430, A164566

Sequence in context: A163427 A215805 A339692 * A191046 A045443 A153116

Adjacent sequences: A164564 A164565 A164566 * A164568 A164569 A164570

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Aug 16 2009

Status

approved