OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Range[8215]^2 + 6, And @@ PrimeQ[# - {0, 2}] &] (* Amiram Eldar, Jan 05 2020 *)
PROG
(PARI) for(x=1, 9999, ispseudoprime(x^2+4)&&ispseudoprime(x^2+6)&&print1(x^2+6", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, Jan 25 2015
STATUS
approved