A095011 Number of 8k+5 primes (A007521) in range ]2^n,2^(n+1)].

0, 1, 1, 1, 3, 2, 6, 11, 20, 35, 63, 118, 216, 407, 759, 1424, 2686, 5094, 9652, 18472, 35068, 67068, 128421, 246403, 473647, 911479, 1757076, 3390256, 6552075, 12675294, 24545280, 47583568, 92332958, 179313476, 348551899, 678031524, 1319932086, 2571422341

Offset: 1

Author

Antti Karttunen and Labos Elemer, Jun 01 2004

Keywords

• nonn

Links

• Antti Karttunen and John Moyer, C-program for computing the initial terms of this sequence.
• Index entries for sequences related to occurrences of various subsets of primes in range ]2^n,2^(n+1)].

Crossrefs

Cf. A007521, A091128, A095010, A095014.

Programs

Mathematica

Module[{nn = 21, s}, s = Select[8 Range[0, 2^nn] + 5, PrimeQ]; Table[Count[s, ?(2^n < # < 2^(n + 1) &)], {n, nn}]] (* _Michael De Vlieger, Jul 23 2017 *)

Formula

a(n) = A095014(n) - A095010(n).

Extensions

a(34)-a(38) from Amiram Eldar, Jun 12 2024