

A127441


Numbers n such that between n and n+sqrt(n) there are no primes.


2



3, 7, 8, 13, 23, 24, 31, 113, 114, 115, 116
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

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


MAPLE

a = {}; Do[If[PrimePi[x + x^(1/2)]  PrimePi[x] == 0, AppendTo[a, x]], {x, 1, 249900000000000}]; a


PROG

(PARI) isok(n) = primepi(n+sqrtint(n)) == primepi(n); \\ Michel Marcus, Nov 07 2013


CROSSREFS

Cf. A000720, A028392.
Sequence in context: A252496 A279517 A106474 * A067064 A093722 A002381
Adjacent sequences: A127438 A127439 A127440 * A127442 A127443 A127444


KEYWORD

nonn,more


AUTHOR

Artur Jasinski, Jan 14 2007


STATUS

approved



