|
|
A179208
|
|
Primes prime(k) such that 2*prime(k) = prime(k-2) + prime(k+2).
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Transpose[Select[Partition[Prime[Range[300]], 5, 1], (First[#]+Last[#])/2 == #[[3]]&]][[3]] (* Harvey P. Dale, Feb 16 2014 *)
|
|
PROG
|
(Sage)
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
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|