%I A136763
%S A136763 1,1,2,6,1,9,4,2,1,12,9,8,7,7,8,9,11,1,1,2,3,5,9,1,2,4,9,1,3,7,1,3,7,1,
%T A136763 3,10,2,6,1,4,1,3,10,2,9,2,8,2,8,2,9,2,11,3,1,4,1,7,2,11,4,1,6,2,12,4,
               1,
%U A136763 9,3,1,8,3,1,8,3,1,9,4,2,12,5,2,1,8,4,2,1,7,3,2,1,7,4,2,1,9,5,3,1,1
%N A136763 Leading digit of n! in base 13.
%t A136763 f[n_]:=First[IntegerDigits[n!,13]]; lst={};Do[AppendTo[lst,f[n]],{n,0,
               2*5!}];lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jun 
               14 2009]
%Y A136763 Cf. A000142, A136699, A136754, A136755, A136756, A136757, A136758, A136759, 
               A136760, A008905, A136761, A136762, A136764, A136765, A136766.
%Y A136763 Sequence in context: A136765 A011041 A100831 this_sequence A109530 A111519 
               A008855
%Y A136763 Adjacent sequences: A136760 A136761 A136762 this_sequence A136764 A136765 
               A136766
%K A136763 base,easy,nonn
%O A136763 0,3
%A A136763 Carl R. White (oeisfan(AT)phodd.net), Jan 21 2008