login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A126243 a(n) = smallest prime number p which is the arithmetic mean of n-th prime < p and n-th prime > p. 5
5, 11, 11, 41, 29, 37, 53, 67, 131, 71, 97, 139, 127, 727, 193, 157, 191, 211, 191, 359, 307, 521, 349, 577, 571, 353, 307, 487, 347, 541, 571, 487, 541, 409, 947, 593, 563, 569, 787, 547, 587, 983, 587, 569, 587, 1223, 563, 557, 1213, 569, 563, 1381, 1213 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Hans Havermann, Table of n, a(n) for n = 1..10000.

Hans Havermann, Plot of n, a(n) for n = 1..10000

EXAMPLE

5 is the smallest prime p = prime(n) such that p = (prime(n-1)+prime(n+1))/2 (5 = (3+7)/2).

MATHEMATICA

f[n_] := Block[{k = n + 1, p}, While[p = (Prime[k - n] + Prime[k + n])/2; p != Prime[k], k++ ]; p]; Table[f[n], {n, 58}] (* Ray Chandler, Dec 27 2006 *)

CROSSREFS

Cf. A006562, A119381, A126238-A126243.

Sequence in context: A058197 A289464 A289580 * A095805 A244534 A034596

Adjacent sequences:  A126240 A126241 A126242 * A126244 A126245 A126246

KEYWORD

nonn

AUTHOR

Artur Jasinski, Dec 21 2006

EXTENSIONS

Extended by Ray Chandler, Dec 27 2006

Figure and b-file updated by Hans Havermann, Feb 07 2007

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 January 20 05:41 EST 2020. Contains 331067 sequences. (Running on oeis4.)