OFFSET
0,1
COMMENTS
Arbitrarily long subsequences of consecutive 0's occur. a(n) is always <= 46. All values below 34 occur (see A095391); does 34?
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..2000
EXAMPLE
a(0) = 46 because there are 46 primes between 0*210 and 1*210.
a(1) = 35 because there are 35 primes between 1*210 and 2*210.
MATHEMATICA
a[n_]:=PrimePi[210 (n + 1)] - PrimePi[210 n]; Table[a[n], {n, 0, 100}] (* Vincenzo Librandi, Jul 08 2018 *)
PROG
(Magma) [46] cat [#PrimesInInterval(210*n, 210*(n+1)): n in [1..80]]; // Vincenzo Librandi, Jul 08 2018
(PARI) a(n) = primepi(210*(n+1)) - primepi(210*n); \\ Ruud H.G. van Tol, Oct 27 2024
(PARI) a(n) = my(res = 0); forprime(p = n*210, (n+1)*210, isprime(p) && res++); res \\ David A. Corneth and Ruud H.G. van Tol, Oct 27 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jun 16 2004
EXTENSIONS
Edited by Don Reble, Jun 16 2004
Examples corrected by Matthew Vandermast, Jun 17 2004
STATUS
approved