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 A096702 #9 Feb 16 2024 10:05:12 %S A096702 5503,6301,8233,14489,14591,14747,15907,17789,20543,22067,22699,23321, %T A096702 24593,25423,26251,26347,28477,29059,33161,41023,42337,44021,48187, %U A096702 51551,53279,55001,59693,64661,78173,81457,82561,84017,85621,88301 %N A096702 Balanced primes of order ten. %H A096702 Harvey P. Dale, <a href="/A096702/b096702.txt">Table of n, a(n) for n = 1..1000</a> %e A096702 5503 is a member because %e A096702 5503 = (5431 + 5437 + 5441 + 5443 + 5449 + 5471 + 5477 + 5479 + 5483 + 5501 + 5503 + 5507 + 5519 + 5521 + 5527 + 5531 + 5557 + 5563 + 5569 + 5573 + 5581)/21 = 115563/21. %t A096702 Transpose[ Select[ Partition[ Prime[ Range[10000]], 21, 1], #[[11]] == (#[[1]] + #[[2]] + #[[3]] + #[[4]] + #[[5]] + #[[6]] + #[[7]] + #[[8]] + #[[9]] + #[[10]] + #[[12]] + #[[13]] + #[[14]] + #[[15]] + #[[16]] + #[[17]] + #[[18]] + #[[19]] + #[[20]] + #[[21]])/20 &]][[11]] %t A096702 Transpose[Select[Partition[Prime[Range[9000]],21,1],Total[#]/21 == #[[11]]&]][[11]] (* _Harvey P. Dale_, Mar 09 2014 *) %Y A096702 Cf. A096693, A006562, A082077, A082078, A082079, A096697, A096698, A096699, A096700, A096701, A096703, A096704. %K A096702 nonn %O A096702 1,1 %A A096702 _Robert G. Wilson v_, Jun 26 2004