A127032 Maximal value of m such that 5^m <= n! : a(n) = floor( log(n!) / log(5) ).

0, 0, 1, 1, 2, 4, 5, 6, 7, 9, 10, 12, 14, 15, 17, 19, 20, 22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42, 44, 46, 48, 50, 52, 55, 57, 59, 61, 63, 66, 68, 70, 73, 75, 77, 80, 82, 85, 87, 89, 92, 94, 97, 99, 102, 104, 107, 109, 112, 114, 117

Offset

1,5

Links

Table of n, a(n) for n=1..60.

Mathematica

With[{c=Log[5]}, Table[Floor[Log[n!]/c], {n, 60}]] (* Harvey P. Dale, Nov 16 2021 *)

Crossrefs

Cf. A067850, A127031, A127032, A127033, A127034, A127035, A127036, A127037, A127039.

Sequence in context: A003233 A218544 A286045 * A350396 A255165 A047316

Adjacent sequences: A127029 A127030 A127031 * A127033 A127034 A127035

Keyword

nonn

Author

Artur Jasinski, Jan 03 2007

Status

approved