Voozh

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

(list; graph; refs; listen; history; text; internal format)

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