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 A214045 #7 May 14 2019 16:34:57 %S A214045 1,1,2,2,3,5,6,7,8,10,11,13,15,16,18,20,21,23,25,27,29,31,33,35,37,39, %T A214045 41,43,45,47,49,51,53,56,58,60,62,64,67,69,71,74,76,78,81,83,86,88,90, %U A214045 93,95,98,100,103,105,108,110,113,115 %N A214045 Least m>0 such that n! <= 5^m. %H A214045 Clark Kimberling, <a href="/A214045/b214045.txt">Table of n, a(n) for n = 1..1000</a> %e A214045 a(6) = 5 because 5^4 < 6! <= 5^5. %t A214045 Table[m=1; While[n!>5^m, m++]; m, {n,1,100}] %t A214045 Join[{1},Table[Ceiling[Log[5,n!]],{n,2,90}]] (* _Harvey P. Dale_, May 14 2019 *) %Y A214045 Cf. A213858. %K A214045 nonn,easy %O A214045 1,3 %A A214045 _Clark Kimberling_, Jul 18 2012