|
| |
| |
|
|
|
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; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
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 (grafix(AT)csl.pl), Jan 05 2007
|
| |
|
|
