OFFSET
0,3
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..1000
EXAMPLE
6! = 720 decimal = 23100 quartal, so a(6) = 1.
MATHEMATICA
nzd[n_]:=Module[{rd=RealDigits[n!, 4][[1]]}, If[Last[rd]!=0, Last[rd], Last[ Flatten[Most[Split[rd]]]]]]; Array[nzd, 100, 0] (* Harvey P. Dale, May 08 2014 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Carl R. White, Jan 16 2008
STATUS
approved