%I A127116
%S A127116 1,1,2,6,26,143,880,6820,61270,612700,6740700,83088500,1211283600,
%T A127116 17058212600,270017301300,4560302022000,82065335385000,1648341372414000,
%U A127116 34076827548280000,725735500635080000,17178403115182870000
%N A127116 n! in base 9.
%t A127116 b = Table[IntegerDigits[n!, 9], {n, 1, 15}]; a = {}; Do[AppendTo[a, FromDigits[b[[x]]]], 
               {x, 1, Length[b]}]; a (*Artur Jasinski*)
%Y A127116 Cf. A127109, A127110, A036603, A127112, A127113, A127114, A127115, A127116.
%Y A127116 Sequence in context: A002788 A134094 A009575 this_sequence A107404 A120574 
               A002710
%Y A127116 Adjacent sequences: A127113 A127114 A127115 this_sequence A127117 A127118 
               A127119
%K A127116 nonn
%O A127116 0,3
%A A127116 Artur Jasinski (grafix(AT)csl.pl), Jan 05 2007