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 A082431 #12 Jun 10 2018 04:21:09 %S A082431 2,5,89,53,157,173,1597,15233,8803,106753,1570927,5296771 %N A082431 a(n) = the smallest prime p such that there are exactly n sets of consecutive primes, each of which has an arithmetic mean of p. %e A082431 a(4) = 53 because there are exactly four sets of consecutive primes which have means of 53: {53}, {47,53,59}, {41,...,67} and {31,...,73}, %o A082431 (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=nextprime(m+1); 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 A082431 Cf. A050221, A050237, A060863, A082370. %K A082431 more,nonn %O A082431 1,1 %A A082431 _Naohiro Nomoto_, May 11 2003 %E A082431 Edited by _Don Reble_, Jun 17 2003