[go: up one dir, main page]

login
A127114
n! in base 7.
4
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.
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 *)
KEYWORD
nonn,base
AUTHOR
Artur Jasinski, Jan 05 2007
EXTENSIONS
More terms from Harvey P. Dale, Jun 19 2011
STATUS
approved