A126239 Primes of the form p = prime(n+1) such that prime(n) = (prime(n+3)+prime(n-1))/2.

1013, 2791, 4003, 4933, 5437, 5503, 5521, 5843, 6037, 6529, 7109, 7823, 8087, 8161, 8363, 10093, 17021, 18253, 18307, 19753, 21143, 22777, 25031, 25343, 25933, 26683, 27277, 27407, 27793, 28433, 28621, 33151, 33749, 35507, 35527, 36457, 36781

Offset: 1

Author

Artur Jasinski, Dec 21 2006

Keywords

• nonn

Crossrefs

Cf. A006562, A119381, A126238-A126243.

Programs

Mathematica

Prime@Select[Range[3, 4000], 2Prime[ # - 1] == Prime[ # - 2] + Prime[ # + 2] &] (* Ray Chandler, Dec 27 2006 *)

Extensions

Edited and extended by Ray Chandler, Dec 27 2006