Search: id:A008905 Results 1-1 of 1 results found. %I A008905 %S A008905 1,1,2,6,2,1,7,5,4,3,3,3,4,6,8,1,2,3,6,1,2,5,1,2,6,1,4,1,3,8,2,8,2, %T A008905 8,2,1,3,1,5,2,8,3,1,6,2,1,5,2,1,6,3,1,8,4,2,1,7,4,2,1,8,5,3,1,1,8, %U A008905 5,3,2,1,1,8,6,4,3,2,1,1,1,8,7,5,4,3,3,2,2,2,1,1,1,1,1,1,1,1,9,9,9 %N A008905 Leading digit of n!. %H A008905 T. D. Noe, Table of n, a(n) for n=0..1000 %H A008905 Index entries for sequences related to factorial numbers %t A008905 Do[ Print[ IntegerPart[ n!/10^Floor[ N[ Log[ 10, n! ], 12 ] ] ] ], {n, 0, 121} ] %t A008905 and/or...a[n_]:=First[IntegerDigits[n! ]]; [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Dec 03 2008] %Y A008905 Cf. A000966, A000142. %Y A008905 Sequence in context: A010590 A049061 A082516 this_sequence A136760 A062539 A110218 %Y A008905 Adjacent sequences: A008902 A008903 A008904 this_sequence A008906 A008907 A008908 %K A008905 nonn,base,easy %O A008905 0,3 %A A008905 Russ Cox (rsc(AT)swtch.com) Search completed in 0.001 seconds