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

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, -1, -1, -2, -1, 0, -2, -2, -1, -2, -1, -3, -2, -1, -1, -3, -2, -2, -3, 0, 0, -1, 0, -5, -2, -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

Offset: 1

Author

Reinhard Zumkeller, Dec 01 2003

Keywords

• sign
• base

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000120, A014499.

Cf. A007088, A004676, A090431.

Cf. A049084, A071600, A090456, A090457.

Programs

Mathematica

Table[DigitCount[n,2,1]-DigitCount[Prime[n],2,1],{n,80}] (* Harvey P. Dale, Aug 08 2013 *)

Formula

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

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

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

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

Extensions

Definition clarified by Harvey P. Dale, Aug 08 2013