A127114 n! in base 7.

1, 1, 2, 6, 33, 231, 2046, 20460, 225360, 3040650, 42562410, 663200340, 14604306060, 310211542410, 6204234151200, 163322250505200, 4256423144450400, 134630366022322500, 3634363143602406600, 134462435323300144200, 4233013654405404511500

Offset

0,3

Comments

Number of digits in A127114(n) = A127033(n) + 1.

Links

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

Mathematica

b = Table[IntegerDigits[n!, 7], {n, 1, 15}]; a = {}; Do[AppendTo[a, FromDigits[b[[x]]]], {x, 1, Length[b]}]; a (*Artur Jasinski*)
FromDigits[IntegerDigits[#, 7]]&/@(Range[0, 20]!) (* Harvey P. Dale, Jun 19 2011 *)

Crossrefs

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

Sequence in context: A018952 A019028 A280769 * A138909 A138983 A121774

Adjacent sequences: A127111 A127112 A127113 * A127115 A127116 A127117

Keyword

nonn,base

Author

Artur Jasinski, Jan 05 2007

Extensions

More terms from Harvey P. Dale, Jun 19 2011

Status

approved