OFFSET
1,1
LINKS
Zak Seidov, Table of n, a(n) for n = 1..3000
EXAMPLE
a(1)=6803 because 6797=7*971, 6799=13*523, 6801=3*2267, 6805=5*1361, 6807=3*2269, 6809=11*619.
PROG
(PARI) lista(nn) = {forprime(p=7, nn, if (bigomega(p-6)==2 && bigomega(p+6)==2 && bigomega(p-4)==2 && bigomega(p+4)==2 && bigomega(p-2)==2 && bigomega(p+2)==2, print1(p, ", ")); ); } \\ Michel Marcus, Jan 07 2016
(Magma) IsSemiprime:=func< p | &+[ k[2]: k in Factorization(p)] eq 2 >; [p: p in PrimesInInterval(3, 4*10^6)| IsSemiprime(p+2) and IsSemiprime(p-2) and IsSemiprime(p+4) and IsSemiprime(p-4)and IsSemiprime(p+6) and IsSemiprime(p-6)]; // Vincenzo Librandi, Jan 07 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Jan 04 2016
EXTENSIONS
More terms from Michel Marcus, Jan 07 2016
STATUS
approved