A155006 Primes p such that (p-2)*(p+2)-+2*p are primes.

5, 7, 13, 23, 37, 43, 73, 167, 233, 263, 433, 557, 587, 593, 607, 727, 857, 1153, 1597, 1627, 1753, 2143, 2663, 2713, 3433, 3607, 3863, 3947, 4027, 4363, 4423, 4673, 5147, 5477, 5623, 5807, 5903, 6277, 7237, 7333, 7577, 8287, 8647, 8837, 8887, 9043, 10067

Offset

1,1

Comments

3*7-10=11, 3*7+10=31,...

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

lst={}; Do[p=Prime[n]; If[PrimeQ[(p-2)*(p+2)-2*p]&&PrimeQ[(p-2)*(p+2)+2*p], AppendTo[lst, p]], {n, 7!}]; lst
Select[Prime[Range[1500]], AllTrue[(#-2)(#+2)+{2#, -2#}, PrimeQ]&] (* Harvey P. Dale, Jan 01 2025 *)

Crossrefs

Cf. A125272, A053184, A038872, A141158, A038615, A098058, A038936, A089270, A140559, A154939

Sequence in context: A105904 A038901 A260791 * A201474 A078724 A191022

Adjacent sequences: A155003 A155004 A155005 * A155007 A155008 A155009

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jan 18 2009

Status

approved