login
Numbers n that begin a sequence of 100 consecutive integers (n, n+1, ..., n+99) containing at least 25 primes.
0

%I #12 Aug 24 2015 15:23:20

%S 1,2,3,4,5,10,11

%N Numbers n that begin a sequence of 100 consecutive integers (n, n+1, ..., n+99) containing at least 25 primes.

%C For n=2 the sequence contains the maximum number of primes (26).

%e There are 25 primes between a(3)=3 and a(3) + 99 = 102.

%t Select[Range[1,30],PrimePi[#+99]-PrimePi[#-1]>24&]

%t (* _Robert G. Wilson v_, Aug 07 2015 *)

%Y Cf. A000040, A000720.

%K nonn,fini,full

%O 1,2

%A _Marco RipĂ _, Aug 07 2015