|
| |
| |
|
|
|
1, 1, 2, 6, 26, 143, 880, 6820, 61270, 612700, 6740700, 83088500, 1211283600, 17058212600, 270017301300, 4560302022000, 82065335385000, 1648341372414000, 34076827548280000, 725735500635080000, 17178403115182870000
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
MATHEMATICA
| b = Table[IntegerDigits[n!, 9], {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: A180891 A171151 A177381 * A107404 A120574 A178324
Adjacent sequences: A127113 A127114 A127115 * A127117 A127118 A127119
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Jan 05 2007
|
| |
|
|
