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!)
A195325 Least n-gap prime: a(n) = least prime p for which there is no prime between n*p and n*q, where q is the next prime after p. 14

%I

%S 2,59,71,29,59,149,191,641,149,347,809,461,3371,1487,857,1301,1877,

%T 5849,4721,9239,4271,1619,1481,20507,20981,32117,13337,19379,24977,

%U 48779,20441,25301,5651,37991,17747,43577,176777,145757,191249,84809,150209,11717

%N Least n-gap prime: a(n) = least prime p for which there is no prime between n*p and n*q, where q is the next prime after p.

%C Such a prime always exists.

%C The sequence is unbounded.

%C Conjecture. For n >= 2, a(n) is a lesser of twin primes (A001359). This implies the twin prime conjecture. - _Vladimir Shevelev_, Sep 15 2011

%C If a member of this sequence is not the lesser of a twin prime pair, it is greater than 10^10. - _Charles R Greathouse IV_, Sep 15 2011

%C A dual sequence: b(n)= least prime p for which there is no prime between n*q and n*p, where q is the previous prime before p. Evidently, b(n) is the next prime after a(n): 3,61,73,31,..., and for n>=2, by the same conjecture, b(n) is a greater of twin primes.

%H Charles R Greathouse IV, <a href="/A195325/b195325.txt">Table of n, a(n) for n = 1..169</a>, (first 100 terms from Alois P. Heinz)

%p a:= proc(n) local p, q;

%p p:= 2; q:= nextprime(p);

%p while nextprime(n*p) < (n*q) do

%p p, q:= q, nextprime(q)

%p od; p

%p end:

%p seq (a(n), n=1..25); # _Alois P. Heinz_, Sep 15 2011

%t pQ[p_, r_] := Block[{q = NextPrime[p]},NextPrime[r*p]> r*q]; f[n_] := Block[{p = 2}, While[ !pQ[p, n], p = NextPrime[p]]; p]; f[1] = 2; Array[f, 42] (* _Robert G. Wilson v_, Sep 18 2011 *) (* Revised by _Zak Seidov_, Sep 19 2011 *)

%Y Cf. A080192, A195270, A195271, A164368, A194658, A164294, A110835, A195465.

%K nonn

%O 1,1

%A _Vladimir Shevelev_, Sep 15 2011

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 July 9 14:56 EDT 2020. Contains 335543 sequences. (Running on oeis4.)