OFFSET
1,1
EXAMPLE
31 is a term because (15 + 21 + 25 + 33 + 35 + 39 + 49)/7 = 31 is prime.
617 is a term because (591 + 597 + 611 + 623 + 629 + 633 + 635)/7 = 617 is prime.
MATHEMATICA
Select[Mean /@ Partition[Select[Range[1, 9000, 2], PrimeOmega[#] == 2 &], 7, 1], PrimeQ] (* Amiram Eldar, Jul 11 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Elmo R. Oliveira, Jul 10 2023
STATUS
approved