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 A000193 #19 Jun 28 2024 05:26:18 %S A000193 0,1,1,1,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,4, %T A000193 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4, %U A000193 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 %N A000193 Nearest integer to log n. %H A000193 T. D. Noe, <a href="/A000193/b000193.txt">Table of n, a(n) for n=1..10000</a> %p A000193 Digits := 100; f := n->round(evalf(log(n))); [ seq(f(n), n=1..100) ]; %t A000193 Round[Log[Range[100]]] (* _Paolo Xausa_, Jun 28 2024 *) %o A000193 (PARI) a(n)=round(log(n)) %o A000193 (Haskell) %o A000193 a000193 = round . log . fromIntegral -- _Reinhard Zumkeller_, Mar 17 2015 %Y A000193 Cf. A000195, A004233. %K A000193 nonn,easy %O A000193 1,5 %A A000193 _N. J. A. Sloane_