login
A104355
Number of trailing zeros in decimal representation of A104350(n).
3
0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6
OFFSET
1,10
LINKS
FORMULA
a(A104356(n)) = n and a(m) < n for m < A104356(n);
a(n) = A122840(A104350(n)). - Reinhard Zumkeller, Mar 10 2013
MATHEMATICA
IntegerExponent[FoldList[Times, Array[FactorInteger[#][[-1, 1]] &, 100]], 10] (* Amiram Eldar, Apr 08 2024 *)
PROG
(PARI) gpf(n) = {my(p = factor(n)[, 1]); p[#p]; }
a(n) = valuation(prod(k = 2, n, gpf(k)), 10); \\ Amiram Eldar, Apr 08 2024
(PARI) \\ See link. David A. Corneth, Apr 08 2024
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Mar 06 2005
STATUS
approved