2,7

Vincenzo Librandi, Table of n, a(n) for n = 2..1000

DigitCount[#, 10, 5]&/@Rest[FoldList[Times, 1, Prime[Range[100]]]] (* Vincenzo Librandi, Apr 07 2014 *)

(PARI) See program in Number of 0's in n#

Cf. A002110.

Sequence in context: A070201 A070138 A024153 * A056674 A227761 A037188

Adjacent sequences: A079124 A079125 A079126 * A079128 A079129 A079130

easy,nonn

Cino Hilliard, Feb 03 2003

approved