A219478 Prime numbers that are the mean of 5 successive primes.

79, 281, 349, 439, 643, 677, 787, 887, 1171, 1327, 1733, 1811, 2141, 2347, 2389, 2767, 2791, 3323, 3329, 3529, 3929, 4157, 4349, 4751, 4799, 4919, 4951, 5003, 5189, 5323, 5347, 5521, 5531, 5857, 5861, 6287, 6337, 6473, 6823, 6967, 6997, 7507, 7933, 8233

Offset

1,1

Links

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

Example

a(1) = 79 = (prime(20)+...+prime(24))/5 = (71+ 73+ 79+ 83+ 89)/5
a(2) = 281 = (prime(58)+...+prime(62))/5 = (271+ 277+ 281+ 283+ 293)/5
a(8) = 887 = (prime(151)+...+prime(155))/5 = (877+ 881+ 883+ 887+ 907)/5

Mathematica

Select[(Mean /@ Partition[Prime[Range[1000]], 5, 1]), PrimeQ]

Crossrefs

Cf. A082077, A219505.

Sequence in context: A142932 A219505 A180455 * A082077 A341182 A158769

Adjacent sequences: A219475 A219476 A219477 * A219479 A219480 A219481

Keyword

nonn

Author

Zak Seidov, Nov 20 2012

Status

approved