A095094 Number of A080114-primes in range ]2^n,2^(n+1)].

1, 2, 2, 2, 3, 4, 7, 10, 16, 30, 51, 88, 153, 277, 509, 905, 1660, 3079, 5535, 10234, 19053

Offset

1,2

Links

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

A. Karttunen and J. 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) = A036378(n) - A095095(n).

Prog

(PARI) is(p) = {if(!isprime(p), return(0)); my(s=0); for(i=1, (p-1)/2, if((s+=kronecker(i, p))<0, return(0))); 1; }
a(n) = sum(p=2^n+1, 2^(n+1), is(p)); \\ Jinyuan Wang, Jul 20 2020

Crossrefs

Cf. A080114.

Sequence in context: A048185 A368520 A377083 * A275009 A103894 A022868

Adjacent sequences: A095091 A095092 A095093 * A095095 A095096 A095097

Keyword

nonn,more

Author

Antti Karttunen, Jun 01 2004

Status

approved