A090455 - OEIS

%I #12 Apr 24 2022 02:31:20

%S 0,-1,0,-2,-1,-1,1,-2,-2,-2,-2,-1,0,-1,-1,-3,-3,-3,0,-2,0,-2,0,-2,0,

%T -1,-1,-2,-1,0,-2,-2,-1,-2,-1,-3,-2,-1,-1,-3,-2,-2,-3,0,0,-1,0,-5,-2,

%U -2,-1,-4,-1,-3,3,-1,0,-1,1,0,0,1,1,-5,-3,-4,-2,-2,-3,-3,0,-4,-4,-3

%N Difference between numbers of binary 1's of n and binary 1's of n-th prime.

%H Amiram Eldar, <a href="/A090455/b090455.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A000120(n) - A014499(n);

%F a(A071600(n)) = a(A049084(A072439(n))) = 0.

%F a(A049084(A090456(n))) < 0.

%F a(A049084(A090457(n))) > 0.

%t Table[DigitCount[n,2,1]-DigitCount[Prime[n],2,1],{n,80}] (* _Harvey P. Dale_, Aug 08 2013 *)

%Y Cf. A000120, A014499.

%Y Cf. A007088, A004676, A090431.

%Y Cf. A049084, A071600, A090456, A090457.

%K sign,base

%O 1,4

%A _Reinhard Zumkeller_, Dec 01 2003

%E Definition clarified by _Harvey P. Dale_, Aug 08 2013