%I #4 Mar 30 2012 17:31:17
%S 0,0,0,1,1,-1,1,1,1,3,5,10,10,38,48,85,157,280,477,900,1540,2894,5464,
%T 9762,18132,33450,62364,116657,217500,407235,763246,1432291,2698847,
%U 5087838,9620802,18210979,34487702,65417618,124353014,236558508
%N Difference between A095765 and A095766.
%C A095765: Number of primes whose binary expansion begins '10' less A095766: Number of primes whose binary expansion begins '11'.
%C The difference between successive runs of A112416.
%C A112416: a(n) = next-to-most-significant binary digit of n-th prime.
%t f[n_] := PrimePi[2^n + 2^(n - 1)] - PrimePi[2^n] - PrimePi[2^(n + 1)] + PrimePi[2^n + 2^(n - 1) - 1]; Array[f, 40]
%Y Cf. A106701, A112416, A095765-A095766.
%K base,sign
%O 1,10
%A _Robert G. Wilson v_, Jan 24 2006