OFFSET
1,1
EXAMPLE
63487 is a term because it is the initial term of 9 consecutive primes {63487, 63493, 63499, 63521, 63527, 63533, 63541, 63559, 63577} = {a, b, c, d, e, f, g, h, i}: the arithmetic mean of three sets, i.e., (a + b + c)/ 3, (d + e + f)/3 and (g + h + i)/3 is prime.
MATHEMATICA
Select[Partition[Prime@ Range[5*10^5], 9, 1], Function[{a, b, c, d, e, f, g, h, i}, AllTrue[{(a + b + c)/3, (d + e + f)/3, (g + h + i)/3}, PrimeQ]] @@ # &][[All, 1]] (* Michael De Vlieger, Oct 23 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
K. D. Bajpai, Oct 23 2017
STATUS
approved