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 A135941 #22 Jun 17 2022 19:03:03
%S A135941 1,2,1,4,2,3,2,8,4,5,3,6,4,4,3,16,8,9,6,10,7,7,5,12,8,8,6,9,7,7,6,32,
%T A135941 16,17,11,18,12,12,9,20,13,14,10,14,11,11,9,24,16,16,12,17,13,13,11,
%U A135941 18,14,14,11,15,12,12,10,64,32,33,22,34,23,23,17,36,24,24,18,25,19,19,15
%N A135941 a(n) = floor(n/S2(n)), where S2(n) is the binary weight of n.
%H A135941 Samuel Harkness, <a href="/A135941/b135941.txt">Table of n, a(n) for n = 1..10000</a>
%H A135941 Samuel Harkness, <a href="/A135941/a135941.jpg">Scatterplot of the first 100000000 terms</a>
%F A135941 a(n) = floor(n/A000120(n)).
%t A135941 Table[Floor[n/First@ DigitCount[#, 2] &@ n], {n, 79}] (* _Michael De Vlieger_, Nov 30 2015 *)
%o A135941 (PARI) a(n) = n\hammingweight(n); \\ _Michel Marcus_, Nov 30 2015
%Y A135941 Cf. A000120.
%K A135941 easy,nonn
%O A135941 1,2
%A A135941 _Ctibor O. Zizka_, Mar 02 2008
%E A135941 a(0) removed by _Michel Marcus_, Nov 30 2015