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 A004791 #14 Jul 04 2021 13:03:03
%S A004791 2,6,7,20,148,403,1096,2980,8101,8102,8103,59874,442413,1202604,
%T A004791 3269017,8886110,24154952,65659968,65659969,485165195,1318815734,
%U A004791 3584912845,3584912846,9744803446,72004899336,72004899337,195729609428,532048240600
%N A004791 Numbers k >= 2 such that if 1 <= j < k then fractional part of log k > fractional part of log j.
%o A004791 (PARI) lista(n) = {last = frac(log(1)); for (k=1, n, new = frac(log(k)); if (new > last, print1 (k, ", "); last = new;););} \\ _Michel Marcus_, Mar 21 2013
%Y A004791 Cf. A004790.
%K A004791 nonn
%O A004791 1,1
%A A004791 _Clark Kimberling_
%E A004791 More terms from _David W. Wilson_