|
| |
|
|
A096710
|
|
Quadruply balanced primes: primes which are averages of both their immediate neighbor, their second neighbors, their third neighbors and their fourth neighbors.
|
|
7
| |
|
|
98303927, 580868459, 784857323, 857636141, 909894647, 951508837, 1367470823, 1480028171, 1850590099, 2106973159, 2121382079, 2409718043, 2635873907, 2704854637, 3225527099, 3386231579, 3823510039, 3824915671, 3905211517
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 98303927 is a member because
98303927 = (98303903 + 98303951)/2 = (98303897 + 98303957)/2 = (98303873 + 98303981)/2 = (98303867 + 09303987)/2.
|
|
|
MATHEMATICA
| a = {}; Do[p = 2Prime[n]; If[p == Prime[n - 1] + Prime[n + 1], If[ p == Prime[n - 2] + Prime[n + 2], If[p == Prime[n - 3] + Prime[n + 3], If[p == Prime[n - 4] + Prime[n + 4], Print[p/2]; AppendTo[a, p/2]]]]], {n, 6, 117039731}]; a
|
|
|
CROSSREFS
| Cf. A006562, A051795, A096709, A055380.
Sequence in context: A114662 A075010 A184151 * A168640 A202722 A182750
Adjacent sequences: A096707 A096708 A096709 * A096711 A096712 A096713
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 28 2004
|
|
|
EXTENSIONS
| More terms from Jud McCranie (JudMcCranie(AT)ugaalum.uga.edu), Sep 29 2006
|
| |
|
|
