|
| |
| |
|
|
|
1, 1, 2, 6, 33, 231, 2046, 20460, 225360, 3040650, 42562410, 663200340, 14604306060, 310211542410, 6204234151200, 163322250505200, 4256423144450400, 134630366022322500, 3634363143602406600, 134462435323300144200, 4233013654405404511500
(list; graph; refs; listen; history; internal format)
|
|
|
|
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]!) (* From Harvey P. Dale, June 19 2011 *)
|
|
|
CROSSREFS
| Cf. A127109, A127110, A036603, A127112, A127113, A127114, A127115, A127116, A127033.
Sequence in context: A162429 A018952 A019028 * A138909 A138983 A121774
Adjacent sequences: A127111 A127112 A127113 * A127115 A127116 A127117
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Jan 05 2007
|
|
|
EXTENSIONS
| More terms from Harvey P. Dale, June 19 2011.
|
| |
|
|
