OFFSET
0,3
LINKS
David A. Corneth, Table of n, a(n) for n = 0..9999
EXAMPLE
a(10) = 4 as 10! = 41110300_15 which has leading digit 4. - David A. Corneth, Jan 15 2021
MATHEMATICA
f[n_]:=First[IntegerDigits[n!, 15]]; lst={}; Do[AppendTo[lst, f[n]], {n, 0, 2*5!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jun 14 2009 *)
PROG
(PARI) a(n) = digits(n!, 15)[1]; \\ Michel Marcus, Jan 27 2015
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Carl R. White, Jan 21 2008
STATUS
approved