This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A115985 #7 Jul 20 2024 19:33:02 %S A115985 1,2,3,7,8,10,11,13,14,16,19,20,24,25,27,28,32,33,35,36,40,41,44,48, %T A115985 54,57,58,59,61,62,63,65,66,67,73,74,75,80,83,84,85,88,90,94,98,103, %U A115985 104,109,118,119,121,128,131,136,140,141,142,146,147,148,152,156,158 %N A115985 Positive n which are not the average of a run of at least 2 consecutive primes. %e A115985 4=(3+5)/2, so 4 does not belong. %t A115985 With[{nn=400},Select[Complement[Range[nn],Union[Flatten[ Table[ Select[Mean/@Partition[ Prime[Range[PrimePi[nn]]],n,1],IntegerQ],{n,2,PrimePi[nn]}]]]],#<nn/2&]] (* _Harvey P. Dale_, Apr 08 2012 *) %Y A115985 Cf. A060863, A115984. %K A115985 nonn %O A115985 1,2 %A A115985 _Giovanni Resta_, Feb 10 2006