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 A363168 #25 Jul 23 2023 01:53:38 %S A363168 27947,111337,193283,197341,197621,347063,809821,955193,1029803, %T A363168 1184269,1292971,1609163,1630859,1656019,1752449,1883381,1935517, %U A363168 1969661,2120221,2156383,2238959,2287133,2548631,2592089,2750903,2866403,3165769,3257941,3590299,3889423 %N A363168 Balanced primes of order 100. %C A363168 A prime p is in this sequence if the sum of the 100 consecutive primes just less than p, plus p, plus the sum of the 100 consecutive primes just greater than p, divided by 201 equals p. %H A363168 Harvey P. Dale, <a href="/A363168/b363168.txt">Table of n, a(n) for n = 1..350</a> (all terms up to the 4 millionth prime) %t A363168 Module[{bal=100,nn=300000},Select[Partition[Prime[Range[nn]],2bal+1,1],Mean[#]== #[[bal+1]]&]] [[;;,101]] %Y A363168 Cf. Balanced primes of order b: A006562 (b=1), A082077 (b=2), A082078 (b=3), A082079 (b=4), A096697 (b=5), A096698 (b=6), A096699 (b=7), A096700 (b=8), A096701 (b=9), A096702 (b=10), A096703 (b=11), A096704 (b=12), A300364 (b=13), A300365 (b=14). %K A363168 nonn %O A363168 1,1 %A A363168 _Harvey P. Dale_, Jul 07 2023