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 A211676 #17 Mar 24 2017 00:47:54
%S A211676 1,1,2,3,4,5,6,9,14,24,37,63,93,162,233,376,582,921,1497,2435,4007,
%T A211676 6696,10998,18310,30340,50792,84897,143079,239266,401652,673887,
%U A211676 1131226,1900203,3197114,5373366,9039360,15208992,25592325,43064747,72494816,122025100
%N A211676 Number of n-bit numbers in A077436.
%C A211676 That is, the number of binary numbers b having n bits and B(b) = B(b^2), where the function B gives the number of ones in a binary number. For numbers written in base 10, the corresponding sequence is A147523.
%t A211676 Join[{1}, Table[cnt = 0; Do[If[Total[IntegerDigits[i, 2]] == Total[IntegerDigits[i^2, 2]], cnt++], {i, 2^(n-1), 2^n-1}]; cnt, {n, 15}]]
%Y A211676 Cf. A077436, A147523.
%K A211676 nonn,hard,base
%O A211676 0,3
%A A211676 _T. D. Noe_, Apr 27 2012
%E A211676 a(28)-a(38) from _Donovan Johnson_, Apr 29 2012
%E A211676 a(39)-a(40) from _Donovan Johnson_, Aug 25 2012