A179208 Primes prime(k) such that 2*prime(k) = prime(k-2) + prime(k+2).

11, 13, 17, 103, 107, 151, 179, 251, 409, 421, 491, 701, 709, 739, 941, 1051, 1487, 1571, 1873, 2281, 2441, 2659, 2671, 2741, 2749, 2819, 3011, 3019, 3389, 3463, 4111, 4229, 4231, 4241, 4271, 4397, 5171, 5279, 5569, 5653, 6079, 6311, 6691

Offset: 1

Author

Juri-Stepan Gerasimov, Jan 05 2011

Keywords

• nonn

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A006562 (balanced primes).

Programs

Mathematica

Transpose[Select[Partition[Prime[Range[300]],5,1],(First[#]+Last[#])/2 == #[[3]]&]][[3]] (* Harvey P. Dale, Feb 16 2014 *)

Sage

def is_A179208(n):
    k = prime_pi(n)
    return is_prime(n) and 2*n == nth_prime(k-2)+nth_prime(k+2) # D. S. McNeil, Jan 08 2011