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 A094694 #22 Feb 07 2022 18:21:50
%S A094694 23,46,47,92,94,95,111,184,188,190,191,222,223,367,368,376,380,382,
%T A094694 383,415,444,446,447,479,727,734,736,752,760,764,766,767,830,831,887,
%U A094694 888,892,894,895,958,959,1451,1454,1468,1471,1472,1503,1504,1520,1528
%N A094694 Numbers having in binary representation more 1s than their squares.
%C A094694 A000120(a(n)) > A000120(A000290(a(n))).
%H A094694 Carl R. White, <a href="/A094694/b094694.txt">Table of n, a(n) for n = 1..10000</a>
%t A094694 Select[Range[1600], DigitCount[#, 2, 1] > DigitCount[#^2, 2, 1] &] (* _Harvey P. Dale_, Mar 24 2012 *)
%o A094694 (PARI) is(n)=hammingweight(n)>hammingweight(n^2) \\ _Charles R Greathouse IV_, Jan 27 2014
%o A094694 (Python) print([k for k in range(0, 1530) if bin(k)[2:].count("1") > bin(k**2)[2:].count("1")]) # _Karl-Heinz Hofmann_, Feb 07 2022
%Y A094694 Cf. A077436, A094695, A007088, A001737, A064399, A236514, A351149.
%K A094694 nonn,base
%O A094694 1,1
%A A094694 _Reinhard Zumkeller_, May 20 2004