|
| |
| |
|
|
|
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;
text;
internal format)
|
|
|
|
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
|
| |
|
|
