A186398 Numbers k such that there are 6 primes between 100*k and 100*k + 99.
186, 234, 319, 332, 340, 380, 384, 443, 444, 450, 469, 489, 542, 548, 554, 574, 611, 632, 645, 681, 683, 696, 716, 725, 731, 746, 749, 754, 805, 814, 829, 859, 873, 897, 907, 956, 963, 966, 977, 1000, 1008, 1027, 1044, 1050
Offset: 1
Keywords
Examples
186 is in this sequence because there are 6 primes between 18600 and 18699 (18617, 18637, 18661, 18671, 18679 and 18691).
Links
- T. D. Noe, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
Mathematica
Select[Range[1100],PrimePi[100#+99]-PrimePi[100#]==6&] (* Harvey P. Dale, Jun 24 2018 *)
-
PARI
for(n=1, 1e6, if(sum(k=100*n, 100*(n+1), ispseudoprime(k))==6, print1(n", "))); \\ Charles R Greathouse IV, Feb 21 2011
-
PARI
N=100; s=0; forprime(p=2, 1e6, if(p>N, if(s==6, print1((N\100)-1, ", ")); s=1; N=100*(p\100+1), s++)) \\ Charles R Greathouse IV, Feb 21 2011
Comments