[go: up one dir, main page]

login
A127115
n! in base 8.
4
1, 1, 2, 6, 30, 170, 1320, 11660, 116600, 1304600, 15657400, 230212400, 3443176000, 56312146000, 1211416624000, 23016735654000, 460356735300000, 12067735663300000, 265756631234600000, 6601271140642200000
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*)
KEYWORD
nonn
AUTHOR
Artur Jasinski, Jan 05 2007
STATUS
approved