login
A253640
Greater of twin primes of the form (k^2 + 4, k^2 + 6).
2
7, 31, 1231, 4231, 366031, 819031, 1155631, 1311031, 1575031, 3822031, 4389031, 4515631, 5880631, 7102231, 9333031, 9954031, 13213231, 13432231, 16120231, 19140631, 25654231, 34987231, 37393231, 38875231, 39375631, 41152231, 47955631, 52345231, 53655631, 62647231, 67486231
OFFSET
1,1
LINKS
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