OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
seq={}; Do[If[PrimeQ[n] && PrimeQ[n+2] && PrimeQ[(m = n^2 + 2n - 6)], AppendTo[seq, m]], {n, 1, 1000}]; seq (* Amiram Eldar, Dec 20 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Jul 14 2009
EXTENSIONS
Definition corrected and more terms added by R. J. Mathar, Jul 19 2009
More terms from Amiram Eldar, Dec 20 2019
STATUS
approved