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 A127428 #9 Jul 29 2017 13:59:09 %S A127428 0,1,2,4,5,6,7,8,10,11,12,13,14,17,18,19,20,21,23,24,25,26,27,29,30, %T A127428 31,32,33,35,36,37,38,39,41,42,43,44,45,48,49,50,51,52,54,55,56,57,58, %U A127428 60,61,62,63,64,66,67,68,69,70,72,73,74,75,76,80,81,82,83,84,86,87,88,89,90,92,93 %N A127428 v_5( (10n)! ) - v_5( (5n)! ), where v_p(N) is the p-adic valuation defined in A112765. %F A127428 a(n) - n = a( [(n+2)/5] ). %p A127428 A127428 := proc(n) %p A127428 padic[ordp]((10*n)!,5)-padic[ordp]((5*n)!,5) ; %p A127428 end proc: %p A127428 seq(A127428(n),n=0..100) ; # _R. J. Mathar_, Mar 29 2017 %o A127428 (PARI) a(n) = valuation((10*n)!, 5) - valuation((5*n)!, 5); \\ _Michel Marcus_, Jul 29 2017 %Y A127428 v_5(n) is given in A112765. Cf. A001511, A127427. %K A127428 nonn %O A127428 0,3 %A A127428 _N. J. A. Sloane_, Apr 02 2007 %E A127428 Typo in name corrected by _Michel Marcus_, Jul 29 2017