|
| |
| |
|
|
|
1, 1, 2, 6, 30, 170, 1320, 11660, 116600, 1304600, 15657400, 230212400, 3443176000, 56312146000, 1211416624000, 23016735654000, 460356735300000, 12067735663300000, 265756631234600000, 6601271140642200000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,3
|
|
|
LINKS
|
Table of n, a(n) for n=0..19.
|
|
|
MATHEMATICA
|
b = Table[IntegerDigits[n!, 8], {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: A057221 A180892 A196497 * A180893 A180894 A180895
Adjacent sequences: A127112 A127113 A127114 * A127116 A127117 A127118
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Artur Jasinski, Jan 05 2007
|
|
|
STATUS
|
approved
|
| |
|
|