OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
101 is a term because (91 + 93 + 95 + 111 + 115)/5 = 101 is prime.
743 is a term because (737 + 737 + 745 + 749 + 753)/5 = 743 is prime.
MAPLE
N:= 10^4: # for terms involving semiprimes up to N
OSP:= select(t -> numtheory:-bigomega(t) = 2, [seq(i, i=1..N, 2)]):
select(t -> t::integer and isprime(t), add(OSP[i..-6+i], i=1..5)/5); # Robert Israel, Aug 11 2023
MATHEMATICA
Select[Mean /@ Partition[Select[Range[1, 6500, 2], PrimeOmega[#] == 2 &], 5, 1], PrimeQ] (* Amiram Eldar, Jul 11 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Elmo R. Oliveira, Jul 10 2023
STATUS
approved