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 A075106 #10 Oct 27 2018 22:43:52
%S A075106 1,1,1,2,1,2,3,1,3,3,1,3,3,1,1,4,2,4,1,4,2,4,1,4,2,4,1,4,2,4,5,5,5,1,
%T A075106 5,5,5,5,1,5,5,5,5,1,5,5,5,5,1,5,5,5,5,1,5,5,5,5,1,5,5,5,3,6,1,6,3,2,
%U A075106 3,6,1,6,3,2,3,6,1,6,3,2,3,6,1,6,3,2,3,6,1,6,3,2,3,6,1,6,3,2,3,6,1,6,3,2,3
%N A075106 Denominator of n/floor(log_2(n)); numerator is A075105(n).
%H A075106 Reinhard Zumkeller, <a href="/A075106/b075106.txt">Table of n, a(n) for n = 2..10000</a>
%F A075106 a(n) = A000523(n)/A075104(n).
%t A075106 Table[n/Floor[Log[2,n]],{n,2,110}]//Denominator (* _Harvey P. Dale_, Feb 25 2018 *)
%o A075106 (Haskell)
%o A075106 import Data.Ratio ((%), denominator)
%o A075106 a075106 n = denominator $ n % a000523 n
%o A075106 -- _Reinhard Zumkeller_, Jul 08 2014
%Y A075106 Cf. A000523, A075104, A075105.
%K A075106 nonn,frac
%O A075106 2,4
%A A075106 _Reinhard Zumkeller_, Sep 02 2002