

A217985


Primes that are arithmetical average of 100 consecutive primes.


1



5009, 6047, 8039, 9311, 9497, 11171, 15137, 17029, 18869, 20983, 26339, 28627, 31699, 35023, 38833, 43579, 49199, 49727, 50549, 60089, 68447, 72469, 76603, 87931, 89659, 98809, 99733, 102547, 111217, 143281, 143831, 150431, 185401, 191341, 195137, 195161
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Zak Seidov, Table of n, a(n) for n = 1..1000


EXAMPLE

a(1) = 5009 because prime(620)+...+prime(719) = 4583+...+5441 = 500900.


MATHEMATICA

h = 100; t = {}; s = Prime[Range[h]]; pCnt = h; Do[sm = Total[s]; If[Mod[sm, h] == 0 && PrimeQ[sm/h], AppendTo[t, sm/h]]; pCnt++; s = Append[Rest[s], Prime[pCnt]], {20000}]; t (* T. D. Noe, Oct 22 2012 *)


CROSSREFS

Cf. A000040, A123096, A127337.
Sequence in context: A295459 A238926 A209908 * A201178 A252216 A281299
Adjacent sequences: A217982 A217983 A217984 * A217986 A217987 A217988


KEYWORD

nonn


AUTHOR

Zak Seidov, Oct 21 2012


STATUS

approved



