A079688 Number of 4's in n!.
0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 1, 2, 2, 3, 1, 2, 4, 2, 3, 2, 4, 3, 1, 1, 0, 3, 4, 3, 3, 3, 3, 3, 4, 3, 6, 2, 5, 4, 3, 3, 4, 3, 7, 3, 5, 7, 6, 6, 13, 8, 8, 7, 10, 4, 4, 8, 10, 8, 16, 10, 7, 13, 6, 5, 10, 7, 7, 13, 11, 11, 10, 4, 13, 13, 16, 10, 8, 15, 14, 10, 18, 6, 13, 12, 17, 12
Offset: 0
Links
Programs
-
Mathematica
DigitCount[#,10,4]&/@(Range[0,100]!) (* Harvey P. Dale, Jul 30 2015 *)