A095012 Number of 8k+7 primes (A007522) in range ]2^n,2^(n+1)].

0, 1, 0, 2, 1, 4, 6, 12, 17, 36, 62, 118, 222, 395, 773, 1412, 2699, 5100, 9690, 18384, 35074, 67076, 128446, 246483, 473737, 911126, 1757021, 3390639, 6551367, 12675525, 24545392, 47584301, 92330675, 179318608, 348546687, 678022783, 1319953810, 2571408262

Offset

1,4

Links

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

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)].

Formula

a(n) = A095013(n) - A095009(n).

Mathematica

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

Crossrefs

Cf. A007522, A091129, A095009, A095013.

Sequence in context: A285637 A205845 A034424 * A192781 A253918 A269415

Adjacent sequences: A095009 A095010 A095011 * A095013 A095014 A095015

Keyword

nonn

Author

Antti Karttunen and Labos Elemer, Jun 01 2004

Extensions

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

Status

approved