OFFSET
1,1
LINKS
K. D. Bajpai, Table of n, a(n) for n = 1..10000
EXAMPLE
101 is in the sequence because 101 is prime. 101^2 + 6 = 10207 = 59 * 173 which is semiprime. 101^2 - 6 = 10195 = 5 * 2039 which is semiprime.
157 is in the sequence because 157 is prime. 157^2 + 6 = 24655 = 5 * 4931 which is semiprime. 157^2 - 6 = 24643 = 19 * 1297 which is semiprime.
MAPLE
MATHEMATICA
A243365 = {}; k = Prime[n]; Do[If[PrimeOmega[k^2 + 6] == 2 && PrimeOmega[k^2 - 6] == 2, AppendTo[A243365, k]], {n, 1000}]; A243365
Select[Prime[Range[400]], PrimeOmega[#^2+{6, -6}]=={2, 2}&] (* Harvey P. Dale, Jul 08 2014 *)
PROG
(PARI) s=[]; forprime(p=2, 3000, if(bigomega(p^2+6)==2 && bigomega(p^2-6)==2, s=concat(s, p))); s \\ Colin Barker, Jun 25 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
K. D. Bajpai, Jun 24 2014
STATUS
approved