This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A090455 #12 Apr 24 2022 02:31:20 %S A090455 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 A090455 -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 A090455 -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 A090455 Difference between numbers of binary 1's of n and binary 1's of n-th prime. %H A090455 Amiram Eldar, <a href="/A090455/b090455.txt">Table of n, a(n) for n = 1..10000</a> %F A090455 a(n) = A000120(n) - A014499(n); %F A090455 a(A071600(n)) = a(A049084(A072439(n))) = 0. %F A090455 a(A049084(A090456(n))) < 0. %F A090455 a(A049084(A090457(n))) > 0. %t A090455 Table[DigitCount[n,2,1]-DigitCount[Prime[n],2,1],{n,80}] (* _Harvey P. Dale_, Aug 08 2013 *) %Y A090455 Cf. A000120, A014499. %Y A090455 Cf. A007088, A004676, A090431. %Y A090455 Cf. A049084, A071600, A090456, A090457. %K A090455 sign,base %O A090455 1,4 %A A090455 _Reinhard Zumkeller_, Dec 01 2003 %E A090455 Definition clarified by _Harvey P. Dale_, Aug 08 2013