A219505 Numbers that are arithmetic mean of 5 successive primes.
79, 281, 295, 329, 349, 355, 403, 439, 511, 643, 677, 685, 787, 805, 841, 887, 949, 963, 1171, 1179, 1195, 1241, 1327, 1339, 1397, 1435, 1463, 1503, 1547, 1641, 1685, 1717, 1733, 1779, 1811, 1917, 1957, 1991, 2033, 2061, 2141, 2147, 2347, 2389, 2395, 2433
Offset: 1
Keywords
Examples
a(1) = A219478(1) = 79 = (prime(20)+...+prime(24))/5 = (71+ 73+ 79+ 83+ 89)/5.
Links
- Zak Seidov, Table of n, a(n) for n = 1..1000
Crossrefs
A219478 is subsequence.
Programs
-
Mathematica
Select[(Mean /@ Partition[Prime[Range[1000]], 5, 1]), IntegerQ]