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 A136693 #4 Sep 02 2015 11:06:50
%S A136693 1,1,2,1,4,2,2,2,4,4,4,2,4,4,2,2,2,4,2,2,4,2,2,4,4,4,2,4,4,2,4,4,2,2,
%T A136693 2,4,4,4,2,4,4,2,2,2,4,2,2,4,2,2,4,4,4,2,2,2,4,2,2,4,4,4,2,2,2,4,2,2,
%U A136693 4,4,4,2,4,4,2,4,4,2,2,2,4,4,4,2,4,4,2,2,2,4,4,4,2,4,4,2,2,2,4,2
%N A136693 Final nonzero digit of n! in base 6.
%e A136693 6! = 720 decimal = 3200 senary, so a(6) = 2.
%t A136693 nzd6[n_]:=Module[{c=IntegerExponent[n!,6]},IntegerDigits[n!,6] [[-(c+1)]]]; Array[nzd6,100,0] (* _Harvey P. Dale_, Sep 02 2015 *)
%Y A136693 Cf. A000142, A136690, A136691, A136692, A136694, A136695, A136696, A008904, A136697, A136698, A136699, A136700, A136701, A136702.
%K A136693 base,easy,nonn
%O A136693 0,3
%A A136693 _Carl R. White_, Jan 16 2008