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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A074979 Primes for which the two closest primes are smaller. 7
113, 139, 181, 199, 241, 283, 293, 317, 467, 509, 523, 577, 619, 661, 773, 829, 839, 863, 887, 953, 1021, 1039, 1069, 1129, 1237, 1307, 1327, 1381, 1459, 1499, 1583, 1627, 1637, 1669, 1699, 1759, 1789, 1879, 1913, 1951, 2003, 2039, 2089, 2113, 2143 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

EXAMPLE

The two closest primes to 113 are 109 (difference = 4) and 107 (difference = 6). Both 109 and 107 are smaller than 113, so 113 is in the list.

MATHEMATICA

NextPrim[n_] := Block[{k = n + 1}, While[ !PrimeQ[k], k++ ]; k]; ps = {0, 0, 0, 1}; Do[ps = Drop[ps, 1]; ps = Append[ps, NextPrim[ ps[[ -1]]]]; If[ ps[[ -1]] - ps[[ -2]] > ps[[ -2]] - ps[[1]], Print[ ps[[ -2]]]], {n, 1, 330}]

CROSSREFS

Cf. A001223, A074982, A075030, A075037, A075038, A075043, A075050 and A075051.

Sequence in context: A140005 A198319 A124584 * A164920 A102833 A136078

Adjacent sequences:  A074976 A074977 A074978 * A074980 A074981 A074982

KEYWORD

nonn

AUTHOR

Neil Fernandez, Oct 10 2002

EXTENSIONS

Edited by Robert G. Wilson v, Oct 11 2002

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 February 25 12:01 EST 2020. Contains 332233 sequences. (Running on oeis4.)