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 A031145 #31 Jul 08 2025 19:35:30 %S A031145 1,120,5040,479001600,6402373705728000,121645100408832000, %T A031145 2432902008176640000,1124000727777607680000, %U A031145 15511210043330985984000000,304888344611713860501504000000 %N A031145 Factorials with a record number of zeros. %H A031145 Michael De Vlieger, <a href="/A031145/b031145.txt">Table of n, a(n) for n = 0..59</a> %e A031145 From _Alonso del Arte_, May 19 2017: (Start) %e A031145 Note that 5040 has two zeros, even though only one of them is a trailing zero. %e A031145 Although 3628800 has one more zero than 362880, it still has as many zeros as 5040, and for that reason it is not in this sequence. %e A031145 Thus the next term after 5040 is 479001600, which has four zeros. (End) %t A031145 Function[s, Map[Position[s, #][[1, 1]] &, Union@ FoldList[Max, s]]! ]@ Table[DigitCount[n!, 10, 0], {n, 28}] (* _Michael De Vlieger_, May 20 2017 *) %t A031145 DeleteDuplicates[Table[{n!,DigitCount[n!,10,0]},{n,50}],GreaterEqual[#1[[2]],#2[[2]]]&][[;;,1]] (* _Harvey P. Dale_, Dec 03 2023 *) %Y A031145 Cf. A031144 (indices of factorials), A027868. %K A031145 nonn,base,easy %O A031145 0,2 %A A031145 _N. J. A. Sloane_ %E A031145 More terms from _Erich Friedman_. %E A031145 Name clarified by _Alonso del Arte_, May 19 2017