This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A096708 Balanced primes (A090403) of index 4. 6
 157, 353, 8233, 23893, 26183, 30197, 63697, 118831, 131041, 150203, 152213, 167033, 198013, 293087, 341303, 383983, 494051, 494723, 534007, 551569, 601949, 603541, 629203, 666697, 671287, 679417, 688907, 768203, 787207, 796867, 826039 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS EXAMPLE 353 is a member because 353 = (281 + ...353 + ... + 421)/23 = (271 + .. + 353 + ... + 433)/27 = (241 + ... + 353 + ... + 461)/37 = (227 + ... + 353 + ... + 487)/45. MATHEMATICA f[n_] := Block[{c = 0, k = 1, p = Prime[n], s = Plus @@ Table[ Prime[i], {i, n - 1, n + 1}]}, While[k != n - 1, If[s == (2k + 1)p, c++ ]; k++; s = s + Prime[n - k] + Prime[n + k]]; c]; Prime[ Select[ Range[2, 25797], f[ # ] == 4 &]] CROSSREFS Cf. A096693, A096695, A096705, A096706, A096707, A096709. Sequence in context: A060974 A073277 A180233 * A142833 A142478 A052028 Adjacent sequences:  A096705 A096706 A096707 * A096709 A096710 A096711 KEYWORD nonn AUTHOR Robert G. Wilson v, Jun 28 2004 EXTENSIONS a(17)-a(31) from Donovan Johnson, Apr 09 2010 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 22 05:11 EST 2019. Contains 319353 sequences. (Running on oeis4.)