A126239 Primes of the form p = prime(k+1) such that prime(k) = (prime(k+3)+prime(k-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,1

Links

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

Mathematica

Prime@Select[Range[3, 4000], 2Prime[ # - 1] == Prime[ # - 2] + Prime[ # + 2] &] (* Ray Chandler, Dec 27 2006 *)
Select[Partition[Prime[Range[4000]], 5, 1], #[[2]]==(#[[1]]+#[[5]])/2&][[;; , 3]] (* Harvey P. Dale, Nov 26 2025 *)

Crossrefs

Cf. A006562, A119381, A126238-A126243.

Sequence in context: A161404 A252634 A250610 * A120214 A251267 A096928

Adjacent sequences: A126236 A126237 A126238 * A126240 A126241 A126242

Keyword

nonn

Author

Artur Jasinski, Dec 21 2006

Extensions

Edited and extended by Ray Chandler, Dec 27 2006

Status

approved