OFFSET
1,1
LINKS
Muniru A Asiru, Table of n, a(n) for n = 1..5000
EXAMPLE
157 is a term because 157 = (97 + 101 + 103 + 107 + 109 + 113 + 127 + 131 + 137 + 139 + 149 + 151 + 157 + 163 + 167 + 173 + 179 + 181 + 191 + 193 + 197 + 199 + 211 + 223 + 227)/25 = 3925/25.
MATHEMATICA
Select[Partition[Prime[Range[12000]], 25, 1], Mean[#]==#[[13]]&][[All, 13]] (* Harvey P. Dale, Jun 28 2020 *)
PROG
(GAP) P:=Filtered([1..150000], IsPrime);;
a:=List(Filtered(List([0..12000], k->List([1..25], j->P[j+k])), i->Sum(i)/25=i[13]), m->m[13]); # Muniru A Asiru, Mar 04 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jun 26 2004
STATUS
approved