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 A075105 #10 Oct 27 2018 22:43:34 %S A075105 2,3,2,5,3,7,8,3,10,11,4,13,14,5,4,17,9,19,5,21,11,23,6,25,13,27,7,29, %T A075105 15,31,32,33,34,7,36,37,38,39,8,41,42,43,44,9,46,47,48,49,10,51,52,53, %U A075105 54,11,56,57,58,59,12,61,62,63,32,65,11,67,34,23,35,71,12,73,37,25,38 %N A075105 Numerator of n/floor(log_2(n)); denominator is A075106(n). %H A075105 Reinhard Zumkeller, <a href="/A075105/b075105.txt">Table of n, a(n) for n = 2..10000</a> %F A075105 a(n) = n/A075104(n). %t A075105 Table[n/Floor[Log[2,n]],{n,2,80}]//Numerator (* _Harvey P. Dale_, Feb 25 2018 *) %o A075105 (Haskell) %o A075105 import Data.Ratio ((%), numerator) %o A075105 a075105 n = numerator $ n % a000523 n %o A075105 -- _Reinhard Zumkeller_, Jul 08 2014 %Y A075105 Cf. A000523, A075104, A075106. %K A075105 nonn,frac %O A075105 2,1 %A A075105 _Reinhard Zumkeller_, Sep 02 2002