OFFSET
1,1
COMMENTS
For all k in the sequence, k+2 and k+6 are primes and k, k+4 and k+8 are semiprimes.
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
EXAMPLE
19007 = 83*229; 19009 is prime; 19011 = 3*6337; 19013 is prime; 19015 = 5*3803.
MAPLE
q:= k-> andmap(isprime, [k+2, k+6]) and andmap(numtheory[bigomega]=2, [k, k+4, k+8]):
select(q, [6*i+5$i=0..26332])[]; # Alois P. Heinz, Jan 07 2026
MATHEMATICA
okQ[k_]:=PrimeOmega[k]==2&&PrimeQ[k+2]&&PrimeQ[k+6]&&PrimeOmega[k+4]==2&&PrimeOmega[k+8]==2; Select[Range[160000], okQ] (* James C. McMahon, Jan 20 2026 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Soko Kosaka, Jan 02 2026
STATUS
approved
