A095095 Number of A080115-primes in range [2^n,2^(n+1)].

0, 0, 0, 3, 4, 9, 16, 33, 59, 107, 204, 376, 719, 1335, 2521, 4804, 9089, 17311, 33100, 63352, 121283

Offset

1,4

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) - A095094(n).

Prog

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

Crossrefs

Cf. A080115.

Sequence in context: A054188 A093368 A278025 * A339152 A003611 A192115

Adjacent sequences: A095092 A095093 A095094 * A095096 A095097 A095098

Keyword

nonn,more

Author

Antti Karttunen, Jun 01 2004

Status

approved