A127116 n! in base 9.

1, 1, 2, 6, 26, 143, 880, 6820, 61270, 612700, 6740700, 83088500, 1211283600, 17058212600, 270017301300, 4560302022000, 82065335385000, 1648341372414000, 34076827548280000, 725735500635080000, 17178403115182870000

Offset

0,3

Links

Table of n, a(n) for n=0..20.

Mathematica

b = Table[IntegerDigits[n!, 9], {n, 1, 15}]; a = {}; Do[AppendTo[a, FromDigits[b[[x]]]], {x, 1, Length[b]}]; a (*Artur Jasinski*)

Crossrefs

Cf. A127109, A127110, A036603, A127112, A127113, A127114, A127115, A127116.

Sequence in context: A171151 A177381 A289312 * A107404 A120574 A333044

Adjacent sequences: A127113 A127114 A127115 * A127117 A127118 A127119

Keyword

nonn

Author

Artur Jasinski, Jan 05 2007

Status

approved