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 A050237 #14 Jul 04 2018 14:18:23 %S A050237 1,2,5,12,38,30,173,165,12259,8803,36735,67263,5296771,32975,1147233 %N A050237 a(n) = the smallest number m such that there are exactly n sets of consecutive primes, each of which has an arithmetic mean of m. %C A050237 First appearance of n in A122821. %e A050237 a(4) = 38 because there are exactly four sets of consecutive primes which have means of 38: {31,37,41,43}, {29,...,47}, {23,...,53} and {2,...,83}, %o A050237 (PARI) {a(n)= m=2; starting_index=1; k=starting_index; sum_of_primes=0; prime_count=0; sets=0; until( (prime(starting_index)>m) && (sets==n), if( (prime(starting_index)> m) || (sets>n), m++; sets=0; starting_index=1; k=starting_index); sum_of_primes=sum_of_primes+prime(k); prime_count++; mean=sum_of_primes/ prime_count; if(mean<m, k++, sum_of_primes=0; prime_count=0; starting_index++; k=starting_index; if(mean==m, sets++))); return(m)} \\ _Rick L. Shepherd_, Jun 14 2004 %Y A050237 Cf. A060863, A082431, A122821. %K A050237 more,nonn %O A050237 0,2 %A A050237 _Naohiro Nomoto_, May 08 2003 %E A050237 Edited by _Don Reble_, Jun 17 2003