login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A096709 Balanced primes (A090403) of index 5. 7
173, 124991, 232607, 491423, 701489, 1356337, 2455681, 3128803, 5218607, 9459683, 10563461, 13228247, 14606029, 16282921, 18216137, 20378273, 21622201, 35201909, 36549169, 38638969, 39246689, 42074017, 43048039, 48961859 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..24.

EXAMPLE

124991 is a member because 124991 = (124673 + ... + 125329)/59

= (124543 + ... + 125423)/75 = (124193 + ... + 125777)/137 = (124133 + ... + 125887)/151

= (123931 + ... + 126031)/181.

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[ # ] == 5 &]]

CROSSREFS

Cf. A096693, A096695, A096705, A096706, A096707, A096708.

Sequence in context: A185707 A185701 A138267 * A180417 A160660 A025390

Adjacent sequences:  A096706 A096707 A096708 * A096710 A096711 A096712

KEYWORD

nonn

AUTHOR

Robert G. Wilson v, Jun 28 2004

EXTENSIONS

a(6)-a(24) 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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 18 15:18 EDT 2019. Contains 328161 sequences. (Running on oeis4.)